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Turn your Apple into the world's 
most versatile personal computer. 



The SoftCard ™ Solution. SoftCard 
turns your Apple into two computers. 
A Z-80 and a 6502. By adding a Z-80 
microprocessor and CP/M to your 
Apple, SoftCard turns your Apple into 
a CP/M based machine. That means 
you can access the single largest body 
of microcomputer software in exist- 
ence. Two computers in one. And, the 
advantages of both. 

Plug and go. The SoftCard system 
starts with a Z-80 based circuit card. 
Just plug it into any slot (except 0) of 
your Apple. No modifications required. 
SoftCard supports most of your Apple 
peripherals, and, in 6502-mode, your 
Apple is still your Apple. 

CP/M for your Apple. You get CP/M 
on disk with the SoftCard package. It's 
a powerful and simple-to-use operating 
system. It supports more software 
than any other microcomputer operat- 
ing system. And that's the key to the 
versatility of the SoftCard/Apple. 



BASIC included. A powerful tool, 
BASIC-80 is included in the SoftCard 
package. Running under CP/M, ANSI 
Standard BASIC-80 is the most 
powerful microcomputer BASIC 
available. It includes extensive disk I/O 
statements, error trapping, integer 
variables, 16-digit precision, exten- 
sive EDIT commands and string func- 
tions, high and low-res Apple graphics, 
PRINT USING, CHAIN and COM- 
MON, plus many additional com- 
mands. And, it's a BASIC you can 
compile with Microsoft's BASIC 
Compiler. 

More languages. With SoftCard and 
CP/M, you can add Microsoft's ANSI 
Standard COBOL, and FORTRAN, or 



Basic Compiler and Assembly Lan- 
guage Development System. AIL more 
powerful tools for your Apple. 
Seeing is believing. See the SoftCard 
in operation at your Microsoft or Apple 
dealer. We think you'll agree that the 
SoftCard turns your Apple into the 
world's most versatile personal 
computer. 

Complete information? It's at your 
dealer's now. Or, we'll send it to you 
and include a dealer list. Write us. Call 
us. 

SoftCard is a trademark of Microsoft. Apple II and 
Apple II Plus are registered trademarks of Apple 
Computer. Z-80 is a registered trademark of Zilog, 
Inc. CP/M is a registered trademark of Digital 
Research, Inc. 
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2MHZ 6809 SYSTEMS 

GIMIX offers you a variety to choose from! 
38 MB WINCHESTER SYSTEM $17,498.99 

HARDWARE FEATURES: 

• 2MHz 6809 CPU • DMA Double Density Floppy Disk Controller 

• 512KB Static RAM * Dual 8" DSDD Floppy Disk System 

• 8 RS232C Serial Ports * Dual Winchester Subsystem with 

• 2 Parallel Ports Two19 MB 5V 4 " Winchester Drives 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User • OS-9 Text Editor 
Operating System * OS-9 Assembler 

• OS-9 Debugger 

19 MB WINCHESTER SYSTEM $8998.09 

HARDWARE FEATURES: 

• 128K Static Ram * 4 RS232C Serial Ports 

• 2MHz 6809 CPU * 1 MB 5 1 / 4 " Floppy Disk Drive 

• 19 MB 5 1 / 4 " Winchester DMA Subsystem • DMA Double Density Floppy Disk Controller 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User * OS-9 Debugger 
Operating System * OS-9 Assembler 

• OS-9 Text Editor 

128KB MULTI-USER SYSTEM $6997.39 

HARDWARE FEATURES: 

• 2MHz 6809 CPU • 2 RS232C Serial Ports 

• DMA Double Density Floppy Disk Controller * Dual 8" DSDD Floppy Disk System 

• 128KB Static Ram 

SOFTWARE FEATURES: Your choice of either UniFLEX or OS-9 LEVEL TWO. Both are Unix-like 
Multi-User/Multi-Tasking Operating Systems. 

56KB FLEX/OS-9 "SWITCHING" SYSTEM $4148.49 

HARDWARE FEATURES: 

• 2MHz 6809 CPU * DMA Double Density Floppy Disk Controller 

• 56K Static Ram * 2 Built-in SW 40tr DSDD Disk Drives 

• 2 RS232C Serial Ports (80 Track DSDD Drive Option . . add $400.00) 
SOFTWARE FEATURES: 

• GMXBUG monitor — FLEX Disk Operating System 

• OS-9 LEVEL ONE Multi-tasking operating system for up to 56K of memory 

WINCHESTER SUBSYSTEMS 

Winchester packages are available for upgrading current GIMIX 6809 systems equipped with DMA controllers, at least one 
floppy disk drive, and running FLEX, OS-9 LEVEL ONE or OS-9 LEVEL TWO. The packages include one or two 19MB (unformat- 
ted) Winchester drives, DMA Hard Disk Interface, and the appropriate software drivers. The Interface can handle two SW 
Winchester Drives, providing Automatic Data Error Detection and Correction: up to 22 bit burst error detection and 1 1 bit burst 
error correction. 

Dual drives can be used together to provide over 30 MBytes of on line storage - or use one for back-up of the other. (More 
convenient and reliable than tape backup systems. 

#90 includes one 19MB Drive, Interface, and Software $4288.90 

#91 includes two 19MB Drives, Interface, and Software $6688.91 

Contact GIMIX for systems customized to your needs or for more information. 
50 HZ Export Versions Available 

GIMIX Inc. reserves the right to change pricing and product ^^^^H H ^M^Hfe ■ ^^ ^ 

specifications at any time without further notice. 1337 WEol 37th PLAGh j ™| .-, !; I ^^k^r mo 

CHICAGO, ILLINOIS 60609 I— ■■ I I ' ! IMC 

GIMIX'"' and GHOST® are registered trademarks ot GIMIX Inc. (312)927-5510 ' | ■^^^^^ k 

FLEX and UniFLEX are trademarks of Technical Systems Consultants Inc. \ t - 

0S^9 is a trademark of Microware Inc. TWX 91 0-221 -4055 1982 GIMIX Inc. 
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is Available 
)ur Features 
And Perl orrr 



FEATURES 


Z-CARD* 


SoftCard* 


APPLI-CARD 


6 mhz Z-80 available 


No 


No 


Yes 


64K on-card memory 


No 


No 


Yes 


CP/M available 


Yes 


Yes 


Yes 


SB-80* with card 


No 


No 


Yes 


40 col. to 255 col. horizontal scroll 


No 


No 


Yes 


Choice of application 


No 


No 


Yes 


2K PROM on the card 


No 


No 


Yes 


Real time clock available on the card 


No 


No 


Yes 


Expansion interface on the card 


No 


No 


Yes 


70 col. upper & lower case 


No 


No 


Yes 


A self-contained Z-80A or Z-80B with 
memory 


No 


No 


Yes 


One-card Wordstar* execution 


No 


No 


Yes 


63K available for program development 
or execution 


No 


No 


Yes 


Menu driven set up 


No 


No 


Yes 



Call today for pricing and product 
Information. Dealer inquiries invited. 



S, INC. 
16776 Bernardo Center Drive, 
San Diego, California 92128 

^aler 



'Registered Trade Marks: Apple II & III Apple Computer, Inc. (APPU-CARD far Apple 111 wilt be available tall 1982), CP/M* Digital Research, Inc., 

2-C\:---:.. *-rjh,'-;cpd: Loyfc Synt*ms bofiCsrd Uk-tri^^ Qinmmm:' Profess, SS4K UMbon mm^wm, Worrfster Mtao?"re, ]nc. 
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THE CHIEFTAIN™ 5 V4-INCH WINCHESTER 

HARD DISK COMPUTER 





SO ADVANCED IN SO MANY WAYS . . . 

AND SO COST-EFFECTIVE . . . 

IT OBSOLETES MOST OTHER SYSTEMS 

AVAILABLE TODAY AT ANY PRICE. 



• HARD DISK SYSTEM CAPACITY 

The Chieftain series includes 5'4- and 8-inch 
. Winchesters that range from 4- to 60- 
megabyte capacity, and higher as technology 
advances. All hard d ins include 

64-k memory with two sen; I ■, ■- -nd 
OOS69D disk operating system;, 

• LIGHTNING ACCESS TIME 

Average access time for :, nc Hesters 

is 70-msec, c< to far more costly 

hard disk systems. That means data transfer 
ten-times fa systems. 



The Chieftain 
Computer Systems: 



Here are the Chi 

hard disk computers that are destined 

to change data processing . . , 



n 



CHIEFTAIN 95W4 

: iiic.-jbitc, " 4-it- 

a 360-k. floppy disk drive (pictured). 

CHIEFTAIN 95XW4 

ID- i 5' W '' „ L 

a 750-k octo-density floppy disk drive. 

CHIEFTAIN 98W15 

15 megabyte, 5VMnch Winchester with 
a 1 -megabyte 8-inch floppy disk drive, 

CHIEFTAIN 9W15T20 

p;-s»essfppe. r.'-i ■■;;.-•:!> Wruchesfer with 



• 2 MHZ OPERATION 

All Chieftains operate at 2-Mriz, regardless 
of disk storage type or operating system 

. Comp^e tips to other hard 1 •:. 
systems, no matter houy ■ ' 

• DMA DATA TRANSFER 

DMA data transfer to-and-from tape and disk 

is ■ r^^siesnee; .. s , ., 

design . sies the necessity 

of halting the processor to wait for data 

whics normally Uvr^-Ppe zi s stawer speed, 
determined by ess -ere ec.es- wsesee oi' 
the disk. 

• RUNS LI S OR OS 9 

ho matter which Chieftain von select . . . 

5U- 0! ?\; or 5'/4- or 8- inch 



n hard 
disk c ons. This 

PSpPreseP:: SSPP- PepeeSPSP/ 

provides full 20 -mega byte 
disk back-up in less than five 
minute, j st one 

command, or copy com- 
mand for in " ! e 
transfers. Tie ita 
tape-to- disk or disk-to 
tape, floppy back-up is 
also aye c " nety 
of configurations. 



Winchestet with tape or floppy back-up ye. 
they all run under DOS or OS-9 with 
no need to modify hardware or software. 

• UNBOUNDED FLEXIBILITY 

You'll pre • si use it, but any Chieftain 

hard disk system can drive up to 20 other 
Winchesters, and four tape drives, with a 
single DMA interface board! 

• SMOKE SIGNAL'S HERITAGE OF 
EXCELLENCE 

This new generation computer is accompa- 
nied by the same Endurance-Certified 
quality Dealers and end-users all over the 
world have come to expect from Smoke 
Signal. And support, software selection and 
extremely competitive pricing are very much 
a part of that enviable reputation. 








Write or call today for details (including the low prices) 
on the Chieftain Series. . . and on dealership opportunities 



r 



® 



SMOKE SIGNAL BROADCASTING 



® 



31336 VIA COLINAS 
WESTLAKE VILLAGE, CA 91362 
TEL (213) 889-9340 



Name . 



Company 



Address. 



City 

Telephone ( 



. Sfafe_ 



-Zip 



About the Cover 




Our cover this month sets you into a 
replica of an archaeological site. Today's 
archaeologists are able to use computers 
on site in their fieldwork and artifact 
analysis. Data collected from digs is 
sorted by various algorithms and organ- 
ized into meaningful material. Com- 
puters are also useful for archaeological 
report preparation. 



Cover Photo: Davey Gomes 

Lowell. Massachusetts 
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Editorial 



MICRO at the Faite 

The Seventh West Coast Computer 
Faire at the San Francisco Civic Center 
gave me a chance to meet many 
MICRO readers. Our readers reflect the 
quality and range of the magazine's 
coverage. They are involved in inter- 
mediate to advanced projects on all of 
the major 6502 and 6809 machines. At 
this Faire, it was the Apple contingent 
that stole the show. Not the Apple 
itself; it has been around too long for 
headlines. Not even the nearby Apple 
corporation attracted exceptional at- 
tention; those folks are playing it cool 
in the face of demands for new product 
announcements that they are not yet 
ready to make. It was the Apple users 
themselves who made the show an 
event. Thousands of them packed the 
aisles, pursuing with enthusiasm their 
ongoing relationship with the Apple 
microcomputer. 

The Apple II succeeded so well 
because its design encouraged the 
largest possible amount of outside sup- 
port. Software developers were able to 
benefit from good system documenta- 
tion. And hardware developers found 
that the Apple created a large market 
for add-on boards. Instead of discour- 
aging users from looking inside the 
computer, the Apple's removable cover 
made it easy for people to see how "the 
computer" was in fact a modular sys- 
tem. Since the original Apple II did 
have some shortcomings (40-column 
video display, for example), Apple 
users became a receptive market for 
boards (such as the 80- column board) 
that improve performance and are easily 
installed. This upgradability has made 
it possible for the Apple to reach 
markets (such as small business) that 
might never have been interested in the 
original machine. 

The Apple's open design has also 
made it less susceptible to obso- 
lescence. Although the Apple's CPU, 
the 6502, has been a powerful and flexi- 
ble success, the fact remains that it was 
designed more as a dedicated than as a 
general-purpose processor. Now that 
more powerful processors are available, 
Apple owners can still take advantage 



of them by plugging in new boards. For 
example, Stellation II' s The Mill and 
ESD Labs' Excel-9 give Apple owners 
access to the 6809 and its powerful 
operating systems FLEX and OS-9. 
Such products enable the Apple to han- 
dle applications that could not have 
been imagined as possible for the 
system at the time of its introduction. 

Sixteen-bit processors (8088, 68000) 
are also becoming available as add-ons 
to the Apple. Apple users can gain 
significant educational advantages by 
running these new processors on their 
existing machines. However, the basic 
Apple architecture can only stretch so 
far. The full power of a processor like 
the 68000 can only be realized in an en- 
vironment that has been created 
especially for it. At the Faire, two such 
68000-based systems vied for atten- 
tion: the Fortune 32:16 and the SAGE 
II. The Fortune system is directed at 
the end-user market. It runs the UNIX 
operating system and offers a solid 
range of basic applications packages. 
The SAGE II system is being marketed 
to OEMs as one of the fastest 68000 
software development systems currently 
available. According to company presi- 
dent Rod Coleman, it runs at 8 
megahertz and can compile 1800 lines 
of code per minute. 

Machines like the Fortune 32:16 
and the SAGE II show how much pro- 
gress has been made since the Apple 
was introduced. The minicomputer 
market is being seriously challenged at 
the microcomputer level. But only a 
few of us can participate — now — in 
the development of the latest 68000 
systems. Many thousands of people are 
participating in the use and develop- 
ment of the Apple, and that is the real 
significance of the Apple computer. No 
longer impressive from the hardware 
point of view, the Apple has achieved 
an outstanding level of support. The 
Seventh West Coast Computer Faire 
was not, by and large, notable for its 
new product announcements. The most 
remarkable exhibit was the Apple com- 
munity's collective display of in- 
dividual effort. 
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Letterbox 



Dear Editor: 

I read with interest the editorial in 
the March 1982 issue of MICRO entitled 
"Hello, OSI?". In response, I offer the 
following statement: 

"M/A COM Office Systems, Inc., 
formerly known as Ohio Scientific, fully 
intends to continue its presence in the 
personal computer market and to sup- 
port our customer base. Our new man- 
agement also supports the company's 
traditional leadership position in 
microcomputer technology and makes 
a firm commitment to maintain that 
position in the growing market for per- 
sonal and small business computers." 

Forthcoming product announce- 
ments will exemplify this commitment. 

Philip M. Johnson 

Corporate Communications Manager 

M/A COM Office Systems, Inc. 

7 Oak Park 

Bedford, MA 01 730 

Dear Editor: 

I have noted several significant 
changes in MICRO in the last several 
months. Some of these are good, but 
some are quite disappointing. 



Please don't neglect your long-time 
readership — the people who started 
reading MICRO to better learn pro- 
gramming in assembler and the hard- 
ware of the computers they own. 

I realize that many of your readers 
are Apple owners. I am also, but there 
are several other fine publications 
dedicated to the Applesoft programmer. 
Stay with what historically you have 
done so well. 

I am also disappointed with the 
reduction in the size of the 6502 
Bibliography. This alone was worth the 
price of the magazine. 

Hardware construction articles are 
applicable to several different machines 
including the single boards. I built the 
clock described several months ago in 
MICRO (37:99) and would like to see 
similar articles. 

Alan P. Wilson 

415 N.Indiana St. 

Salem, IL 62881 



Editor's note: The 6502 Bibliography 
now includes only the most significant 
and useful articles selected from a 
variety of publications in the month 
covered. 



Dear Editor: 

I am preparing a book on the use of 
Microcomputer Programs in Medicine. 
I would appreciate hearing from your 
readers interested in having their pro- 
grams included in this book. The pro- 
grams will include file organization of 
medical records, data extraction, file 
statistics and general statistics used in 
medical research, graphic plotting of 
research data, patient history taking 
and history summarization, patient 
scheduling, and billing routines. I plan 
to publish the programs for the Apple 
II, Commodore PET, and the TRS-80. 

Derek Enlander, M.D. 

Dept. of Nuclear Medicine 

New York University Medical Center 

560 First Avenue 

New York, NY 10016 



Stephen M. Bokei of Data 
Transforms, Inc. sent MICRO 
this sample of a graphic tech- 
nique he calls "ultra-res." 
Approaching the limitl 
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ROM BOARD SYSTEM 



BECAUSE READ ONLY MEMORY WILL NEVER FORGETA FIRMWARE PROGRAM, 
IT WILL STILL BE THERE WHEN THE APPLE IS TURNED OFF AND ON AGAIN. 



APPLESOFT 

UTILITY ROM SYSTEM 

$59.95 

Contains the five most needed 
utilities. Auto line numbering, 
program list control, revive a lost 
program, alphabetize a catalog 
directory, and expunge DOS. 



DISK COPY 

ROM SYSTEM 

$59.95 

Disk backup made easy and con- 
venient. 



FORMAT ROM SYSTEM 
$64.95 

Word processing capabilities for 
Applesoft print statements and 
versatile 'print using' commands. 
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CATALOG 

COMMAND ROM SYSTEM 

$59.95 

One key control of disk files to 
delete, lock, run, load, etc. Also 
displays a map of a disk's used 
and unused sectors. Ideal for 
'Hello' programs. 



ROM BOARD 

(WITHOUT A ROM) 

$29.95 

Has built in I/O and device select 
lines. Will accept 271 6 EPROMS 
or 231 6 ROMS. 



SORT ROM SYSTEM 

$59.95 

Machine language sorting routines 
for string, integer, real, multi- 
dimension arrays, and record 
keeping arrays. 



APPLESOFT* 

RENUMBER/MERGE 

ROM SYSTEM 

$59.95 

Renumberallorpart of a program 
or merge two programs together. 



-APPLESOFT* 

EDITROM SYSTEM 

$59.95 

Easily and conveniently search, 
change, or remove any variable, 
string, or basic command in a 
program. 



The ROM BOARD SYSTEM can be used in any slot to suit your system configuration and is activated with the standard 'PR#' command. 



(Check or M.O.] Visa or MasterCard Accepted 
PLEASE ADD $3.00 FOR SHIPPING 

Soft CTRL Systems, box 599, west milford,njo748o 

201-728-8750 



"REGISTERED TRADEMARK 
ALL FIRMWARE IS COPYRIGHTED 
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Skylcs Electric Works 



Epson-PET/CBM Graphic ROM Pack 

For PET/CBM Owners Who Want: 

Complete Program Listing Printouts 
Complete Screen Graphic Printouts 
Graphic Printouts From Programs 

on your Epson Printer 



Order the Skyles Electric Works EPSON-PET GRAPHIC ROM Package. The ROM when installed in an EPSON MX80, MX80FT, 
or MX100 with Graftrax Plus printer will reproduce most of the PET/CBM graphics characters. Most importantly 
when using the accompanying high speed machine language program, the Epson-PET Graphic ROM pack gives a 
complete program listing with all screen controls shown (cursor, home, clear, etc.). This high speed machine 
language program for program listing, screen image printout (screen dumps) and BASIC program controlled 
printing (i.e. PRINT ) automatically translates the PET-ASCII characters to the EPSON-GRAPHIC ROM characters. A 
BASIC sample program and PRINT subroutine, that may be incorporated into any existing BASIC program, completes 
this "complete solution" package. 



EPSON MODEL 

MX70 

MX80 (serial no. to 359999) 

MX80 (serial no. after 360000) 

MX80FT 

MX80 Graftrax 

MX80 Graftrax Plus 

MX80FT Graftrax Plus 

MX100 

MX100 Graftrax Plus 



ROM MODEL 

Not Available 

EPG80 (EPG82, 3 ROM Version) 

EPG81 (EPG83, 3 ROM Version) 

EPG8F 

Not Available 

EPG8G+ 

EPG8G+ 

Not Available 

EPG10G+ 



The Epson-PET Graphics ROM Pack has been designed to furnish you with PET/CBM graphics printing in the easiest 
way possible. This is done by furnishing a high speed machine language program that is "hidden" at the top of 
your PET/CBM memory. 

The machine language program serves 3 major functions. 

1: Translates PET-ASCII code to ASCII code for program listing. 

2: Translates screen code to ASCII code for screen image printouts. 

3: Translates PET-ASCII code strings to ASCII strings for normal program printout. This feature may also be 
used for making ASCII files for your disk or tape recorder, 




INSTALLATION: Installs into your Epson printer 

PRICE: Epson-PET Graphics ROM Pack EPG80, EPG81. EPG8F — $75.00 
Please specify your Epson printer model type and and serial number when ordering. 
For all PET/CBM's BASIC 2.0/Revision 3, or BASIC 4.0 

AVAILABILITY: Immediately from your LOCAL DEALER 

or 

VISA, MASTERCHARGE ORDERS CALL (800) 227-9998 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (415) 965-1735 



Skylcs Electric Works 



231 E South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 



Rewriting PET ROMs 

by James Yost 



By replacing one or more of 
your PET's ROMs with a 
reprogrammed EPROM, you can 
correct minor bugs or add whole 
new capabilities. 

Rewriting 

requires: 

PET — any operating system 
EPROM programmer 
2716 or 2532 EPROM 
Possibly some electronic 
components 

You've undoubtedly been annoyed 
when your PET/CBM gives you an er- 
ror message after you've opened a file 
that has already been opened. The 
operating system not only claims an 
error, it closes the file. And you must 
have noticed that when doing a 
machine-language save from the 
monitor, a title just over some arbitrary 
length causes a "?" to be printed. You 
must shorten the title and remove the 
"?". Such frustrations provide strong 
motivation for rewriting the PET's 
operating system, and this article will 
tell you how to go about it. The above- 
mentioned annoyances can be elimin- 
ated by changing just three bytes in one 
ROM; other changes of varying com- 
plexity will be suggested. To make 
these changes you should have a 6502 
disassembler, such as in the extended 
monitors (SuperMon, MicroMon, Extra- 
Mon, etc.), and an interest in learning 
machine language. 

The title in tape headers could be 
used for more extensive documentation 
if the 16-character limit were increased 
to a value determined by the 80-charac- 
ter command limit. It turns out that 
there is no reason for limiting titles to 
16 characters, so let's see what we can 
do. The tape buffer will hold 187 char- 
acters of title, but the 80-character 
command lines limit the savable title 



length to 77 characters in BASIC and 64 
characters in the monitor. When print- 
ing "FOUND...", however, we prob- 
ably won't need to take up a third line 
for the overflow from the first two 
lines, so the value shown in table 1 is 
chosen to print 73 characters and keep 
the title on two lines. The ML save 
limitation value is simply changed in 
the error-checking code. When a file to 
be opened is determined to be already 
open, a branch is made to code that 
closes all files and then prints the 
"FILE OPEN ERROR" message. The 
value shown in table 1 changes the 
branch instruction to start after the 
subroutine that closes all files. For in- 
formation on making these changes in 
your machine, see accompanying boxes. 

It is possible to change the reset 
code so that it does not wipe out 
memory. You could change the code at 
$E10C-$E134(1.0)/$E158-$E173(3.0]/ 
$D3FO-$D416(4.0) to simply store your 
top-of-memory value instead of over- 
writing memory to test it. The ROM 
memory test routine doesn't detect the 
most common types of failure, anyway. 



This change is slightly more involved 
than the last ones, and is a good exer- 
cise if you're learning machine language. 



A repeat-key routine that is built in- 
to the normal interrupt routine would 
be very handy, as it wouldn't interfere 
with LOAD and SAVE operations the 
way add-on utilities do. Finding a place 
to put the code is a little problem in the 
1.0 and 3.0 ROMs, but if you are cut- 
ting out the memory check on power- 
up, curtailing the power-up message 
will give you sufficient space. Power- 
up reset code starts at $E0D2(1.0)/ 
$D3B6(4.0), and the power-up message 
is at $E174-$E19A(1.0/$E1B7-$E1DD 
(3.0)/$DEA4-$DECl(4.0). The 4.0 
ROMs have plenty of available space — 
look for runs of aa's. Over 1700 bytes 
are available in ROM address space if 
you make your own EPROM s with 
your own code added. This compen- 
sates for the loss of the $B000 socket 
for 4.0. This project is considerably 
more complex than the others, and is 
recommended only for those who have 
experience in machine language. 



Table 1: Simple Changes to PET ROMs 




1.0 3.0 4.0 Was 


Now 


Change 


- FF42 D6A8 $10 
F5D8 F5D0 F60F $15 

— F52E F56D $41 


$49 

$4E 
$44 


M.L. save title length 
"FOUND " title length 
OPENing open files doesn't 
close them 


Table 2: Locations to Change for Automatic Linking of Auxiliary Chips 


1.0 


3.0 


4.0 


CHRGET E0B5-E0CC 
Initial IRQ E1F4-E1FD 
Also IRQ FD34,FD35 


E0F9-E110 D399-D3B0 
E1EC-E1F3 E00E-E013 
FD0D,FD0E FD58 ; FD59 
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Listing 


1: ROM Changes 


to Dump Screenful with Monitor 


Listing 


2; Modification for LIST Only On Key Down 


'M' Command 






































3.0 


















1.0 






FE63 


20 


CF 


FF 


C9 


0D 


DO 


03 


4C 


C611 


4C 


29 


CC 








FE6B 


Bl 


FF 


20 


A7 


E7 


90 


22 


20 
















FE73 


97 


E7 


20 


01 


F3 


FO 


17 


A6 


CC28 


00 


A8 


AD 


12 


E8 


C9 FF FO 


FE7B 


DE 


DO 


13 


38 


4C 


ED 


FF 




CC30 


F9 


Bl 


AE 


4C 


14 


C6 


FE90 


E4 
























3.0 






FFB1 


A5 


FD 


69 


B7 


85 


FB 


A5 


FE 


C620 


4C 


13 


CC 








FFB9 


69 


00 


85 


FC 


4C 


72 


FE 




CC12 


00 


A8 


AD 


12 


E8 


C9 FF FO 


FFED 


A5 


FD 


E5 


FB 


A5 


FE 


E5 


FC 


CC1A 


F9 


Bl 


5C 


4C 


23 


C6 


FFF5 


90 


B7 


4C 


82 
4.0 


FE 
















4.0 






D5C7 


4C 


C2 


DE 












B69B 


4C 


OD 


BD 








DEC2 


20 


CF 


FF 


C9 


0D 


FO 


03 


4C 


BDOC 


00 


A8 


AD 


12 


E8 


C9 FF FO 


DECA 


CA 


D5 


A5 


FD 


69 


B7 


85 


FB 


BD14 


F9 


Bl 


5C 


4C 


9E 


B6 


DED2 


A5 


FE 


69 


00 


85 


FC 


4C 


CF 
















DEDA 


D5 































To prevent my work from scrolling 
off the top of the screen while I ex- 
amine memory, I developed a ready- 
made modification for the monitor. 
Listing 1 shows the changes needed to 
dump a screenful of memory when the 
M command is used with only one ad- 
dress. If this can be accomplished so 
easily, imagine how many other signifi- 
cant improvements you might make. 

Wouldn't it be nice if a BASIC 
listing scrolled by only when you held 
the space bar down? The LIST code is 



located at $C5A8-$C648 (1.0)/$C5B5- 
$C657 (3.0)/$B630-$B6DD (4.0) and 
the changes are shown in listing 2. On 
40-column graphics keyboards, holding 
down the space bar will scroll the 
listing quickly and the RVS/OFF key 
will scroll it slowly. Releasing the key 
will immediately halt the scrolling, 
and pressing the RUN/ STOP key stops 
the listing, restoring full keyboard 
operation. On business keyboards, 
other keys, such as the left arrow and 
the colon, may be required instead. 
This comes at the expense of dropping 



"FROM START" from the "?REDO 
FROM START" message. The extra 
bytes check the keyboard VIA and con- 
tinue to loop until the VIA shows a key 
depressed. If you want to reverse scroll, 
you will need quite a bit of extra code. 
A utility chip might be your best bet. 

If you regularly use one of the aux- 
iliary chips that adds commands to 
BASIC or the monitor, you can rewrite 
the ROMs to automatically link the 
chip on power-up. The CHRGET rou- 
tine that is transferred to low memory 



Making Your Own ROMs 



You've probably heard about EPROMs (Erasable Pro- 
grammable Read-Only Memories), but you may not realize 
how easy it is to use them. They are erasable, so your 
mistakes won't have drastic consequences, and you can 
make revisions easily. Erasure is by ultraviolet light, but 
don't expect to get by cheaply using sunlight — it takes 
too long and is unreliable. A GE #G8T5 germicidal lamp 
will do the job in 20 or 30 minutes if the chips are about 
one inch from the lamp. A high-intensity UV source like 
this can damage your eyes, so be careful if you build your 
own eraser. An 8-track plastic tape storage box is a good 
size for the lamp hardware. You might decide to pay $40 
and up to get a ready-made one, but you will get only 
polish and convenience for spending more than that; 
erasure isn't any faster or better. 



The best value available is to "burn" your own 
EPROMs with the Branding Iron available from AB Com- 
puters (252 Bethlehem Pike, Colmar, PA 18915). It pro- 
grams single-voltage 2716's (2K) and 2532's (4K) that plug 
directly into the newer PET/CBM boards with 24-pin 
sockets. If yours has 28-pin ROM sockets, see accompanying 
box for owners of old PETs, The software that comes with 
the programmer is a model of efficiency and convenience. 



To program, plug an EPROM in the socket provided 
and flip the program switch on. If the chip gets hot, check 
to see if you have inserted it correctly in the socket. Load 
the machine- language code supplied (occupies $1800- 
$2000), type SYS6144, and the software hooks into the 
monitor to provide extra programming commands. If you 
have code at $2000 to put on a 2716, type .P 2000 27FF. 
The EPROM will be checked for erasure, and any program- 
med locations will be printed in reverse field. The pro- 
gramming then proceeds for a couple of minutes showing a 
running address on the screen. Each byte is checked for 
success, and failures are printed out. A really stuck bit 
(happened once) will show up here. When programming is 
completed, it is checked again, and a new dot prompt ap- 
pears. The contents may be verified with .V 2000 27FF, 
which compares memory locations with bytes in the 
EPROM addressed by the last three hex digits (addressing 
on 2K (2716J/4K (2532) boundaries). Mismatches are 
printed out in reverse field. To view the contents of an 
EPROM, .C 2000 27FF must be used to copy into memory, 
where the M command can access it. Typing .T 32 enables 
2532 operation. Except for programming, these commands 
are virtually instantaneous. A Zero Insertion Force (ZIF) 
socket with clamp/release lever will plug in and make 
EPROM changing much simpler. 
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on power-up resides in the locations 
specified in table 2. Simply note the 
changes in $70 to $87 ($C2-D9 in 1.0) 
and replace them in the ROM. If your 
chip has repeat keys, or otherwise 
changes the IRQ vector in $90, $91 
($0219, $021A in 1.0), that vector 
needs to be changed in the locations 
shown in table 2. 

These changes are the result of a 
long process of learning about machine 



language, primarily by figuring out how 
other programs work. I started with lit- 
tle programs in the second cassette buf- 
fer and worked up to the PET's large 
operating system. My primary tool was 
a disassembler program that converts 
byte values to mnemonics. A SWTPC 
printer that prints 40 columns on 
3 ^ -inch adding machine paper was 
very valuable. In addition to being 
economical, the paper is ideally sized 
for disassembly, and can be accordion- 



folded so that an entire operating 
system is available at your fingertips. If 
you would like to personalize your 
PET, I encourage you to dig into it and 
make it work your way. 



The author may be contacted at P.O. Box 
556, Somerville, MA 02143. 



2716EPROM 

4-40 MACHINE SCREW 
24-PSN SOCKET 




6540 to 2716/2532 Pin Correspondence 



Va" spacer 

(TAPPED FOR 4-40) 



6540 to 2716/2532 Pin Correspondences 



For Owners of Old PETs Only 



Just try to find a 28-pin EPROM to match the 6540 ROM! A little engineer- 
ing can bridge the gap. All the signals needed for the 2716 are available at the 
28-pin socket in one form or another. First the easy ones: the address and data 
lines are exactly the same — just on different pins. A given 28-pin 6540 ROM 
chip is connected to the data lines by a 4K select signal to the Pin 3 Chip 
Select. That will Output Enable both the 2716 and 2532 on Pin 20. However, 
the 6540 and 2716 occupy only half of the 4K address space, and address bit 11 
(All) is low for the first half of this space and high for the rest. Therefore, All 
is supplied to lower-half 6540's on CS3 (Pin 4, a Chip Select requiring lows), 
and to upper-half 6540's on CS1 (Pin 17, a Chip Select pin requiring highs). 
To replace lower-half 6540' s with 1716% or lower and upper with 2532's, 
connect 6540 Pin 4 (All) to 2716/2532 Pin 18. This will enable a 2716 for 
lower-half addresses, and provide Al 1 to the proper pin for 2532's. To replace 
upper-half 6540's with 2716's, All is available at 6540 Pin 17 and needs to go 
through an inverter to provide 2716 Pin 18 with the low for upper-half ad- 
dresses that we need. This inverter can be a 7404 that derives power from 
6540 Pins 1 and 12. The +5 volt Vcc and ground connect to their proper pins, 
of course. Not too bad, all in all; a series of wires running from various pins of 
the 28-pin socket to appropriate different pins on a 24-pin socket, and 
possibly an inverter IC somewhere. The table shows these pin connections. 

I use a sturdy 24-pin socket screwed to a 28-pin header using 3 44nch tapped 
spacers for 28-pin conversion (see figure A), This creates a solid unit that is 
easy to wire and use. Drill two holes in the solid bottom of a 24-pin socket 
and matching holes in a 28-pin header. For spacer stock I obtained plastic tub- 
ing of a size suitable for 4-40 tapping and sawed off pieces. A 6-foot length 
costs less than a dollar. Ready-tapped aluminum spacers may also be used. 

Wires should be soldered between pins according to the table in figure 1 . 
On 28-pin boards, the ROMs are in CO, DO, E0, F0, C8, D8, F8 order begin- 
ning at the right-hand end (H-l). A 2716 would always be used to replace EO, 
as the upper half of the E 4K space is used by the VIAs. A 2532 in the CO, DO, 
FO sockets with Pin 18 (All) connected to 6540 Pin 4 will eliminate the need 
for an inverter. For a 2716 in a C8, D8, or F8 socket, 6540 Pin 17 supplies 
2716 Pin 18 through an inverter. Otherwise 6540 Pin 4 connects directly to 
2716/ 2532 Pin 18. 



6540 


6540 


2716 


2716 2532 


name 


pin 


pin 


name name 


grid 


1 


12 


gnd 


CSS 


2 






CS4 


3 


20 


OE 


CS3 


4 


(18) 


CE All 


A0 


5 


8 


A0 


Al 


6 


7 


Al 


A2 


7 


6 


A2 


A3 


8 


5 


A3 


A4 


9 


4 


A4 


A5 


10 


3 


A5 


A9 


11 


22 


A9 


v cc 


12 


21 


V pp 


V cc 


12 


24 


V 


A8 


13 


23 


A8 


A7 


14 


1 


A7 


A6 


15 


2 


A6 


2 


16 






CS1 


17 (inv) 


(18) 


CE 


A10 


18 


19 


A10 


DB7 


19 


17 


07 


DB6 


20 


16 


06 


DB5 


21 


15 


05 


BD4 


22 


14 


04 


DB3 


23 


13 


03 


DB2 


24 


11 


02 


DB1 


25 


10 


01 


DB0 


26 


9 


00 


CS2 


27 






nc 


28 
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ROCKWELL Microcomputers from Excert, Inc. 



THE AIM 65/40 
Single Board or Smorgasbord 



*a s *& 




A full size terminal style keyboard w/8 special 

function keys 

A smart, 40 character display with its own 

microprocessor 

A 40 column printer w/text and graphic output 

Up to 64K of on-board RAM and ROM 
On-board interfaces include RS232, dual audio 
cassette and 2 user I/O R6522 devices 

Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH 
and PL/65 



THE AIM 65 
Take-Out Order 




A full size terminal style keyboard w/3 special 

function keys 

A 20 character display 

A 20 column printer w/text and graphic output 

capability 

Up to 4K RAM and 20K ROM on-board 

On-board interfaces include 20MA TTY, dual 

audio cassette and 1 user I/O R6522 device 

Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH, 
PASCAL, & PL/65 



And if the above isn't enough, 
Try the RM65 — a product line filled with embellishments including: 



32K DRAM Board 
CRT Controller 
Floppy Disk Controller 
PROM Programmer 



ACIA Board 
IEEE-488Board 
CPU/SBC Board 
4-16 Slot Card Cages 



Prototype cards 
Adaptor Buffer Modules 
Genera! Purpose I/O Board 
PROM/ROM Board 



NEW LOWER PRICES AND A CASH DISCOUNT* TO BOOT! 



A65/40-16(16KRAM) $1225 

A65/40-32 (32K RAM) $1295 

A65/40-A (Assembler) $ 85 

A65/40-B (BASIC) $ 65 



Mail Order to: 

ational Computer Division 
EXCERT INCORPORATED 



• SALES 

• SERVfCE 

1ATION 

• CONSULTING 



P.O BOX 8600 

White Bear Lake, MN 55110 
(612)426-4114 



A65-1 (1 K RAM) $420 

A65-4 <4K RAM) $445 

A65-4B (4K RAM w/BASIC) $495 

A65-PS (PASCAL) $100 

A65-F (FORTH) $ 65 

A65-A (Assembler) $ 35 



Higher quantities quoted upon request, COD's accepted, 
shipping will be added. * Deduct 5% cash discount on 
prepaid orders. Minnesota residents add 5% sales tax. 
Prices subject to change without notice. 
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Tinning and Counting 
with the 6522 



by Marvin L De Jong 



This article describes 
techniques to use the 6522 
Versatile Interface Adapter for 
practical timing and counting 
tasks. Included are programming 
examples and application 
suggestions. 

requires: 

Any system with a 6522 

Versatile Interface Adapter 

(VIA) 

Programming examples for 

Apple II with John Bell 6522 

board in slot #7. 



Once it is understood, the 6522 certainly 
lives up to its name "Versatile Inter- 
face Adapter." The SYM-1 and the AIM 
65 both come equipped with at least 
one 6522. The Apple II is easily equip- 
ped with a 6522, once the peculiarities 
in the Apple II timing design are under- 
stood. l > 2 (Perhaps the easiest way to 
interface a 6522 to an Apple II is to pur- 
chase a 6522 board from John Bell 
Engineering, P.O. Box 338, Redwood 
City, CA 94064.) The 6522 is an im- 
portant device in many real-time con- 
trol applications and it is very useful in 
handling data acquisition tasks in the 
laboratory. 

The purpose of this article is to 
describe some simple 6502 assembly 
language programs to be used in con- 
junction with a 6522 VIA (Versatile In- 
terface Adapter) to perform precision 
timing and/or counting tasks. The 
techniques described require the 
simplest possible hardware accessories. 
In fact, no additional hardware is re- 
quired if your laboratory instrumenta- 
tion produces TTL-level pulses,- a 
single connection to the PB6 pin on the 
6522 will suffice. I also offer some sim- 
ple examples that illustrate how the 
programs may be used to make meas- 
urements of time, temperature, veloci- 
ty, etc. 



Typically, we think of time meas- 
urements in terms of the time between 
two events-, the start and end of a race, 
for example, or the arrival of successive 
cosmic rays. In this case it is assumed 
that suitable transducers, such as 
phototransistors, mark the events with 
a logic-zero pulse as illustrated in figure 
1 . Figure 2 shows a simple circuit that 
produces a logic-zero pulse when a light 



flashes on either of the two phototran- 
sistors. Many other schemes exist for 
signaling the starting and ending 
events, but the scheme in figure 2 
simply illustrates the time-measure- 
ment concept. 



The timing program described 
below will make the measurement of 



Figure 1: Timing diagram for measuring the time, T, between two events. 

EVENT 1 



r 



EVENT 
"START" 



I "END" 



-5 VOLTS 



-H 



Figure 2: A simple phototransistor circuit: light striking either phototransistor will 
produce a logic-zero output voltage. A flash of light will produce a pulse. 



-o 




Figure 3: Timing diagram that illustrates N pulses occurring in time T. 

. EVENT , EVENT 1 , EVENT 2 , EVENT N 



r 



., I, QVCIN I I . ■- 



r 
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the time interval, T, between two suc- 
cessive event pulses as illustrated in 
figure 1 . However, it is also worthwhile 
to be able to measure the time required 
for N events to occur. For example, to 
measure the frequency of a periodic 
pulse train it is sufficient to measure 
the time, T, it takes for N pulses to oc- 
cur. The frequency of the periodic pulse 
train is given by the formula 

f = NAT 

where N is the number of pulses that 
have occurred in time T. Refer to figure 
3 for an illustration of such a pulse 
train. Note that the waveform need not 
be symmetrical (50% duty cycle), nor 
must the waveform be periodic. The 
time for N randomly spaced pulses can 
also be measured. Thus, the pulse-rate 
from a pulse train produced by a radio- 
active decay experiment can also be 
measured. 

Since the 6522 VIA can perform 
both timing and counting functions, it 
is ideally suited to make the measure- 
ments just described. The T2 counter/ 
timer is used to count the N pulses, and 
the Tl timer is used to measure the 
time interval, T, in which these N 
pulses occur. I digress for a moment to 
introduce the registers of the 6522 that 
will be used to make the measurements. 

6522 Control and Flag Registers 

For the moment our concern will be 
with three of the 6522' s sixteen 
registers. These are the Auxiliary Con- 
trol Register (ACR), the Interrupt Flag 
Register [IFR), and the Interrupt Enable 
Register (IER). The ACR controls the 
behavior of both the Tl timer and the 
T2 counter/ timer. It is a control 
register. That is, setting or clearing bits 
in this register determines how the 
various control pins and timers of the 
6522 are going to function. A diagram 
of this register is shown in figure 4. 
This diagram indicates the control 
function of each bit. Note that bits five, 
six, and seven control the behavior of 
the Tl timer and the T2 counter/ timer. 

To be specific about the memory 
location of this register, we must think 
in terms of a specific machine. Assume 
we are using VIA #2 on the SYM-1. 
Then the ACR has the address $A80B. 
T2 must be in its pulse-counting mode, 
so bit five (ACR5) must be one. The Tl 
timer will be used in its free-running 
mode (without toggling Pin PB7| so 
bits six and seven must be loaded with 
a one and a zero, respectively. That is, 
ACR6 will be one and ACR7 will be 
zero. All of this can be accomplished by 



loading the ACR with $60; that is, with 
LDA #$60 and STA $A80B instructions. 

The IFR (Interrupt Flag Register) is 
used to "watch" either Tl or T2 to see 
if either has counted through zero. A 
diagram of this register is shown in 
figure 5. Note that bit five of the IFR 
(IFR5) is set when T2 counts through 
zero, while IFR6 is set when Tl counts 
through zero. Of course, the counting 
rate of Tl is determined by the system 
clock rate, which is typically one MHz. 



If we assume that the 6522 being used 
is the VTA #2 on the SYM-1, then the 
address of the IFR register is $A80D. 
These flags are cleared by reading or 
writing to their corresponding timer 
locations, to be described below. 

Finally, Tl will be used to create 
evenly spaced interrupts on the IRQ 
line of the microcomputer system. 
Therefore, the 6522 must be function- 
ing so that when Tl times out it will 
produce an IRQ- type interrupt. This is 



Figure 4: A Diagram of the Auxiliary Control Register (ACR) 

AUXILIARY CONTROL REGISTER 



ACR7 ACR6 ACR5 ACR4 



ACR3 ACR2 ACR1 



L 



- PAD LATCH CONTROL 

PBD LATCH CONTROL 1 



DISABLE LATCHING 
ENABLE LATCHING 



SHIFT REGISTER CONTROL BITS 
(NOT DISCUSSED) 

T2 COUNTER/TIMER CONTROL 

1 = SINGLE TIME INTERVAL MODE 

1 = PULSE COUNTING MODE 

-T1 TIMER CONTROL 
SINGLE TIME INTERVAL MODE ■ PB7 DISABLED 

1 FREE-RUNNING MODE - PB7 DISABLED 

1 SINGLE TIME INTERVAL MODE - NEGATIVE PULSE ON PB7 
1 1 FREE-RUNNING MODE - SQUARE WAVE ON PB7 



Figure 5; A diagram of the 6522' s Interrupt Flag Register (IFR) 

INTERRUPT FLAG REGISTER 



IFR5 



IFR4 



IFR2 



IFR1 



IFR0 



! ETSET BY TRANSITION ON CA2, 

! CLEARED BY READ OR WRITE OF PAD 

I — SET BY TRANSITION ON CA1, 

CLEARED BY READ OR WRITE OF PAD 
SERIAL REGISTER FLAG 

- SET BY TRANSITION ON CB2, CLEARED BY READ OR WRITE OF PBD 

' SET BY TRANSITION ON CB1, CLEARED BY READ OR WRITE OF PBD 

1 SET BY TIME-OUT OF T2, CLEARED BY READ T2 LOW OR WRITE T2 HIGH 

- SET BY TIME-OUT OF T1 , CLEARED BY READ T1 LOW OR WRITE T1 HIGH 

- SET WHEN ANY OTHER IFR BIT IS SET, CLEARED WHEN ALL OTHER IFR BITS ARE CLEAR 



Figure 6: A diagram of the 6522's Interrupt Enable Register (IER). 

INTERRUPT ENABLE REGISTER 



ER7 IER6 IER5 IER4 IER3 IER2 IER1 



IER0 



I — CA2 IRQ ENABLE 

CA1 IRQ ENABLE 
SHIFT REGISTER IRQ ENABLE 
1 — CB2 IRQ ENABLE 
CB1 IRQ ENABLE 
1 — TIMER 2 IRQ ENABLE 
1 — TIMER 1 IRQ ENABLE 

IER CONTROL (WRITE IER) 

= FOR EACH IER BIT SET TO LOGIC ONE, THE CORRESPONDING IER BIT IS CLEARED 

1 = FOR EACH IER BIT SET TO LOGIC ONE, THE CORRESPONDING IER BIT IS ENABLED 
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accomplished with the IER (Interrupt 
Enable Register) diagrammed in figure 
6. To enable interrupts from Tl, IER6 
must be set by loading it with a one. 
The instructions LDA #$C0 and STA 
$A80E will enable interrupts from Tl if 
the SYM-1 is being used. Note that bit 
seven (ACR7) must be set to logic one 
when writing to the IER if a particular 
interrupt is to be enabled. 

6522 Timing and Counting 
Registers 

The timing and counting registers 
are numbered four through nine. They 
occupy locations $A804 through $A809 
on the SYM-1, VIA #2. Both Tl and T2 
are 16-bit devices. Typically the low- 
order byte is stored first and timing or 
counting commences when the high- 
order byte is stored in the appropriate 
register. For example, if T2 must be set 
up to count 256 ($FF + 1) pulses, then 
its low-order latch at location $A808 is 
loaded with 255 ($FF) and its high- 
order counter is loaded with $00, in 
that order. Observe that the number 
loaded into the 16-bit register (two 
8-bit registers) is one less than the 
number of pulses to be counted, since 
the 6522 must count through zero in 
order to get the T2 flag (IFR5). 



In the programs that follow, the Tl 
timer latches will be loaded with $FFFE 
to produce evenly spaced interrupts 
every 65536 clock cycles. Observe that 
the number of clock cycles between in- 
terrupts is two more than the 16-bit 
number loaded into the two 8-bit latches 
of the Tl timer. Thus, location $A806 
will be loaded with the number $FE 
and, when timing is to commence, 
location $A805 will be loaded with 
$FF. Finally, in order to clear the inter- 
rupt from Tl, its low-order counter 
must be read. This is accomplished by 
reading location $A804, and this in- 
struction will be part of the interrupt 
routine. 



(For additional details regarding the 
timers, see references three and four at 
the end of this paper.) 

The interrupt routine is used to in- 
crement a two-byte interrupt counter 
consisting of two locations in page zero 
of memory. Since interrupts occur 
every 65536 clock cycles, the two-byte 
interrupt counter starts to function 
when the time, T, exceeds 65536 clock 
cycles. The two-byte interrupt counter 
keeps track of the number of 65536 
clock-cycle time intervals in T, while 



the 16-bit counter register in Tl 
measures the number of clock cycles in 
T up to 65535. The longest time inter- 
val, T, that can be measured is approx- 
imately one hour. This maximum time 
is easily increased by making the two- 
byte interrupt counter a three-byte in- 
terrupt counter. 



What will be the function of the T2 
counter? It must first detect the zeroth 
(or starting) event. To do this, T2 is in- 
itially loaded with $0000. The first 
logic-zero pulse will set IFR5, the bit in 
the IFR that is set when T2 counts 
through zero. When that event is 
detected, the Tl timer is started. Next, 
T2 is loaded with the numbei of events 
to be timed, less one since it must 
count through zero. For example, if 
timing is to cease with the next logic- 
zero pulse, then T2 is loaded with zero 
corresponding to one event. If 10,000 
pulses are to be counted, then T2 is 
loaded with 9,999. When T2 counts 
through zero the second time, the Tl 
timer is then read. 

Since Tl counts down from $FFFE, 
the number in Tl must be subtracted 
from $FFFE to give the correct number 
of clock cycles. This two-byte result 
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and the number in the two-byte inter- 
rupt counter form a four-byte number 
representing the number of clock 
cycles between the zeroth event and 
the Nth event. Refer again to figures 1 
and 3. Minor complications of these 
basic ideas will be discussed later. 
However, the basic concept is that Tl 
measures the time, T, for the N events 
counted by T2 to occur. In certain ap- 
plications, the quantity T will be the 
one desired. In other applications, the 
frequency f , where f = N/T, will be the 
desired quantity. Thus, the program is 
capable of measuring either time or 
frequency. 

The Timing Program 

The program to measure the time, 
T, for N events is given in listing 1. 
This listing assumes that a SYM-1 
microcomputer is being used; that is, 
the addresses of the 6522 registers are 
identical to those of VIA #2 on the 
SYM-1. If you have an AIM 65, then 
you will have to drop the "8" in all the 
6522 addresses, and the same program 
will work. If you have an AIM 65, be 
sure to load the indirect jump vector at 
$A404-$05 with $0300, the starting ad- 
dress of the interrupt routine. The Ap- 
ple II interrupt structure is slightly dif- 
ferent, so we have provided a separate 
listing for it. 5 Refer to listing 2 if you 
are an Apple II user. In listing 2 it is 
assumed that the John Bell Engineering 
6522 board is located in slot seven and 
6522-1 (Ul) is being used. A 16-lead 
ribbon connector (DIP Jumper) makes a 
convenient connection between the 
6522 board on the Apple and the out- 
side world. 

Note that the only hardware re- 
quired is a single connection between 
the source of TTL level pulses and Pin 
PB6 on the 6522. No gates, no flip- 
flops, no inverters, and no rat's nest of 
wires are required. 

The previous discussion, when 
coupled with the comments in the two 
listings, should make the assembly lan- 
guage routine understandable. It may 
be worth adding a few points related to 
the corrections that are made (lines 
62-72 in listing 1) to the time after it is 
measured. Refer to listing 1. Immedi- 
ately after the last event is detected, 
the two counter registers of the Tl 
timer are read (the LDY T1CL and the 
LDX T1CH instructions on lines 59 
and 60) . Recall that the counters count 
down. If the low-order byte of Tl is less 
than $04, then by the time the high- 
order byte is read the counter will have 
modified this byte to be one less than it 
should be. The INX instruction on line 



Listing 1: Source File — Timer Program 



A804: 


2 


T1CL 


EQU 


*AS04 


AB05: 


3 


T1CH 


EQU 


*AS05 


AS06: 


4 


TILL 


EQU 


*AS06 


A808: 


5 


T2CL 


EQU 


$AS0S 


A809: 


6 


T2CH 


EQU 


*AS09 


AS0B: 


7 


ACR 


EQU 


*AS0B 


A80D: 


8 


IFR 


EQU 


*AS0D 


AS0E: 


9 


IER 


EQU 


*AS0E 


0019: 


10 


NUMB 


EQU 


*13 ; LOCATIONS $0019 AND 


0000: 


11 


;$001A CONTAIN THE NUMBER OF EVENTS 


0000: 


12 


;less 


ONE, TO BE COUNTED BY T2. 


0000: 


13 


;THE LEAST-SIGNIFICANT BYTE IS IN S0019. 



15 TIME EQU *1D 5LOCATIQNS *001B TO 

IE !*001E CONTAIN THE FOUR-BYTE BINARY 

17 ; MEASUREMENT OF THE TIME, T. 

IS 5THE LEAST-SIGNIFICANT BYTE IS IN *001B. 

NEXT OBJECT FILE NAME IS TIMER PROGRAM. 
20 ORG $0300 



0300: 
0300 : 48 

0301: EG ID 
0303 :D0 02 
1305: EG IE 
0307: AD 04 AS 
030A:68 
030B:40 



23 ; INTERRUPT ROUTINE 
PHA 



24 

25 

26 

27 

28 BR1 

29 

30 



INC TIME 

BNE BR1 

INC TIME+1 

LDA T1CL 
PLA 
RTI 



;SAVE THE ACCUMULATOR ON THE STACK. 

; INCREMENT A TWO-BYTE 

? COUNTER FOR EACH 

;T1 INTERRUPT. 

; CLEAR Tl INTERRUPT FLAG. 

I GET A FROM THE STACK. 







32 


***** + ***** + *+:*+ 




030C: 




33 


5TIMER SUBROUTINE 




030C : DS 




34 




CLD 




; CLEAR THE DECIMAL MODE. 


030DSA2 FF 




35 




LDX 


#*FF 




030FJA9 G0 




36 




LDA 


#*E0 


J SET UP Tl TO RUN FREE 


0311 :SD 0B 


AS 


37 




STA 


ACR 


;AND T2 TO COUNT PULSES. 


0314:A9 FE 




38 




LDA 


#*FE 


JSET UP THE Tl TIMER 


0316:8D 06 


AS 


39 




STA 


TILL 


;WITH *FFFE. 


0319 :A9 C0 




40 




LDA 


#$C0 


; ENABLE IRQ FROM Tl. 


031B:8D 0E 


AS 


41 




STA 


IER 




031E:A9 00 




42 




LDA 


#00 


i CLEAR TWO-BYTE 


0320:85 ID 




43 




STA 


TIME 


! INTERRUPT COUNTER. 


0322:85 IE 




44 




STA 


TIME+1 




0324 :SD 08 


AS 


45 




STA 


T2CL 


5 START WITH IN T2 TO 


0327 :SD 09 


AS 


46 




STA 


T2CH 


; DETECT THE ZEROTH EVENT. 


032A:A9 20 




47 




LDA 


#*20 


?SET UP MASK TO TEST T2 


032C:2C 0D 


AS 


48 


WAIT 


BIT 


IFR 


; INTERRUPT FLAG, IFR5. 


032F:F0 FB 




43 




BEQ 


WAIT 


TWA IT FOR ZEROTH EVENT. 


0331 :8E 05 


AS 


50 




STX 


T1CH 


?START THE TIMER. 


0334 : 58 




51 




CLI 




5MAKE SURE IRQ IS NOT MASKED. 


0335 :A5 19 




52 




LDA 


NUMB 


; RELOAD T2 WITH 


0337 :SD 08 


AS 


53 




STA 


T2CL 


3 NUMBER OF EVENTS. 


033AJA5 1A 




54 




LDA 


NUMB+1 




033C:8D 09 


A8 


55 




STA 


T2CH 




033FJA9 20 




5S 




LDA 


#*20 


?SET UP MASK FOR IFR5, 


0341 :2C 0D 


AS 


57 


LOAF 


BIT 


IFR 


?THE T2 FLAG. 


0344 :F0 FB 




58 




BEQ 


LOAF 


5WAIT FOR ALL THE EVENTS. 


0346: AC 04 


AS 


59 




LDY 


T1CL 


;read the low byte of ti. 


0349 :AE 05 


AS 


60 




LDX 


T1CH 


5 READ THE HIGH BYTE OF Tl. 


034C : 78 




SI 




SEI 




;MASK INTERRUPTS. 


034D:C0 04 




62 




CPY 


#04 


5ADJUST FOR READING HIGH BYTE AFTER 


034F:B0 10 




63 




BCS 


ARND 


■READING THE LOW BYTE. 


0351 :ES 




64 




INX 




5 MAKE CORRECTION TO THE HIGH BYTE. 


0352 :D0 0D 




65 




BNE 


ARND 


?DOES INTERRUPT COUNTER NEED 


0354:38 




EG 




SEC 




; CORRECTION? YES, DECREMENT IT 


0355 :A5 ID 




67 




LDA 


TIME 


!BY SUBTRACTING ONE. 


0357 =E3 01 




68 




SBC 


#01 




0359:85 ID 




69 




STA 


TIME 




035BSA5 IE 




70 




LDA 


TIME+1 




035D:E9 00 




71 




SBC 


#00 




035F:85 IE 




72 




STA 


TIME+1 




0361:84 IB 




73 


ARND 


STY 


TIME-2 


? STORE LOW BYTE. 


0363:86 1C 




74 




STX 


TIME-1 


! STORE HIGH BYTE. 


0365 :A9 FE 




75 




LDA 


#$FE 


5FIND THE LOW COUNT. 


0367 :£5 IB 




76 




SBC 


TIME-2 




0369=85 IB 




77 




STA 


TIME-2 


5 STORE IT. 


036BSA9 FF 




78 




LDA 


#*FF 


5FIND THE HIGH COUNT. 


036DIE5 1C 




79 




SBC 


TIME-1 




036F:B5 1C 




S0 




STA 


TIME-1 


; STORE IT. 


0371:60 




SI 




RTS 






0372: 




S3 


;load 


*A67E AND *A67F 


WITH *00 AND 


0372: 




84 


;*03, 


RESPECTIVELY, TO PRODUCE THE 


0372: 




85 


; INTERRUPT VECTOR FDR 


THE SYM-1. 


*** SUCCESSFUL 


ASSEMBLY: 


NO ERRORS 
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Listing 2: Source File — Apple II Timer 



C704: 
C7B5: 
C70G: 
C70S: 
C709: 
C70B: 
C70D! 
C70E: 
0019: 



0000: 



2 T1CL 


EQU 


*C704 


3 T1CH 


EGU 


*C705 


4 TILL 


EQU 


*C70E 


5 T2CL 


EQU 


*C70S 


G T2CH 


EQU 


$C709 


7 RCR 


EQU 


$C70B 


S IFR 


EQU 


*C70D 


9 IER 


EQU 


*C70E 


10 NUMB 


EQU 


$19 ! LOCATIONS $0019 AND 


11 ;*001A 


CONTAIN THE NUMBER OF EVENTS 


12 5 LESS 


ONE, TO BE COUNTED BY T2. 



13 ;THE LEAST-SIGNIFICfiNT BYTE IB IN $0019. 

15 TIME EQU *1D ^LOCATIONS *001B TO 

IB ;*001E CONTAIN THE FOUR-BYTE BINARY 

17 MEASUREMENT OF THE TIME, T. 

IB ?THE LEAST-SIGNIFICANT BYTE IS IN $001B. 

NEXT OBJECT FILE NAME IS APPLE II TIMER. 
20 ORG $1000 



1000: 

1000SE6 ID 
1002:D0 02 
1004=E6 IE 
100ESAD 04 C7 
1009 i A5 45 
100B:40 



100C 

100C 

100D: 

100Fi 

1011: 

1014: 

1016 

1019: 

101B 

101E 

1020 

1022 

1024 

1027 

102A 

102C 

102F 

1031 

1034 

1035 

1037 

103ASA5 

103C:SD 

103F:A9 

1041 :2C 

1044SF0 

104G:AC 

1049:AE 

104C:7B 

104D:C0 

104F:B0 

1051 :EB 

1052=D0 

1054:38 

1055 :A5 

1057 :E9 

1059:85 

105B:A5 

105DSE9 

105F:85 

1061:84 

10E3:SE 

1065 :A9 

1067JE5 

1069:85 

106B:A3 

106D5E5 

106F:S5 

1071:60 

1072: 
1072: 
1072: 



FF 

60 

0B C7 

FE 

06 C7 

C0 

0E C7 

00 

ID 

IE 

08 C7 

09 C7 
20 

0D C7 
FB 
05 C7 

19 

08 C7 
1A 

09 C7 
20 

0D C7 
FB 

04 C7 

05 C7 

04 
10 



ID 
01 
ID 

IE 
00 
IE 
IB 
1C 
FE 
IB 
IB 
FF 
1C 
1C 



25 
2E 
27 
2S 
29 



if: if : 4: * >^ >K + *++■**+: + + + : 

; INTERRUPT ROUTINE 
TIME 
BR1 

TIME+1 
T1CL 
$45 



INC 
BNE 
INC 
LDA 
LDA 
RTI 



31 
32 

34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
4G 
47 
48 
49 
50 
51 
52 
53 
54 
55 
5E 
57 
58 
59 
60 
61 
62 
63 
64 
65 
6E 
67 
SB 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
B0 



;TIMER SUBROUTINE 
CLD 
LDX 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
STA 
STA 
STA 
LDA 
BIT 
BEQ 
STX 
CLI 
LDA 
STA 
LDA 



WAIT 



#$FF 

#$60 

ACR 

#$FE 

TILL 

#$C0 

IER 

#00 

TIME 

TIME+1 

T2CL 

T2CH 

#$20 

IFR 

WAIT 

T1CH 

NUMB 
T2CL 
NUMB+1 



STA T2CH 
LDA #$20 



BIT 
BEQ 
LDY 
LDX 
SEI 
CPY 
BCS 
INX 
BNE 
SEC 
LDA 
SBC 
STA 
LDA 
SBC 
STA 
STY 
STX 
LDA 
SBC 
STA 
LDA 
SBC 
STA 
RTS 



IFR 
LOAF 
T1CL 
T1CH 

#04 
ARND 

ARND 

TIME 

#01 

TIME 

TIME+1 

#00 

TIME+1 

TIME-2 

TIME-1 

#$FE 

TIME-2 

TIME-2 

#$FF 

TIME-1 

TIME-1 



; INCREMENT A TWO-BYTE 

; COUNTER FOR EACH 

;T1 INTERRUPT. 

; CLEAR Tl INTERRUPT FLAG. 

; RESTORE THE ACCUMULATOR. 



! CLEAR THE DECIMAL MODE. 

;SET UP Tl TO RUN FREE 
jAND T2 TO COUNT PULSES. 
;SET UP THE Tl TIMER 
;WITH $FFFE. 
; ENABLE IRQ FROM Tl. 

? CLEAR TWO-BYTE 
INTERRUPT COUNTER. 

; START WITH IN T2 TO 

? DETECT THE ZEROTH EVENT. 

;SET UP MASK TO TEST T2 

'.INTERRUPT FLAG, IFR5. 

iWAIT FOR ZEROTH EVENT. 

; START THE TIMER. 

;MAKE SURE IRQ IB NOT MASKED. 

*, RELOAD T2 WITH 

$ NUMBER OF EVENTS. 



iSET UP MASK FOR IFR5, 

iTHE T2 FLAG. 

?WAIT FOR ALL THE EVENTS. 

;READ THE LOW BYTE OF Tl. 

;READ THE HIGH BYTE OF Tl. 

!MASK INTERRUPTS. 

^ADJUST FOR READING HIGH BYTE AFTER 

; READING THE LOW BYTE. 

TMAKE CORRECTION TO THE HIGH BYTE. 

;DOES INTERRUPT COUNTER NEED 

; CORRECTION? YES, DECREMENT IT 

;BY SUBTRACTING ONE. 



i STORE LOW BYTE. 
5 STORE HIGH BYTE. 
;FIND THE LOW COUNT. 

; STORE IT. 

?FIND THE HIGH COUNT. 



82 iLOAD $03FE AND $03FF WITH $00 AND 

83 ;$10, RESPECTIVELY, TO PRODUCE THE 

84 ; INDIRECT JUMP IN THE IRQ ROUTINE. 



** SUCCESSFUL ASSEMBLY: NO ERRORS 



64 corrects this mistake should it oc- 
cur. Furthermore, if the high-byte also 
decremented through zero in this time 
interval, then the interrupt counter is 
also in error (one interrupt too large). 
The instructions on lines 65-72 make 
the appropriate correction. 

The timer routine must be used with 
a program to drive it. We chose to use a 
BASIC program to drive it from the Ap- 
ple II, and the program we used is given 
in listing 3. 5 The remarks (REM state- 
ments) should make the BASIC pro- 
gram quite easy to understand. The 
program first requests the number of 
events to be counted. If you are measur- 
ing the time interval between two 
pulses, then the number you input is 
one. In that case, the most important 
output line is 95, and you may wish to 
delete lines 100, 110, 120, and 130. 

If you are measuring frequency (i.e., 
the number of events per unit time), 
then you will need to enter the number 
of periods (pulses) to be counted when 
the program requests "...THE NUM- 
BER OF EVENTS." For example, if you 
want to measure a frequency that is 
near 10,000 Hz, you might enter 
10,000, giving a readout approximately 
once every second. If you want to count 
50,000 pulses from a photomultiplier, 
for example, then you would enter 
50,000 at this point. Statement 130 
lists the number of pulses per second. 
You may wish to delete the other out- 
put statements. Finally, if you are 
measuring the period of a periodic 
waveform, then statement 120 will 
give the most desirable output. 

Note that the program in listing 3 
requires the frequency of the micro- 
computer system clock. In the Apple II 
this frequency is approximately 
1.022714 MHz. (You should measure 
the frequency yourself if you want this 
many significant digits in your 
answer.) The SYM-1 and the AIM 65 
will have a clock frequency that is near 
1.00 MHz. The program in listing 3 
should be modified accordingly. 

Of course, the timer program can 
also be driven with an assembly lan- 
guage program. Some code to load the 
number of events to be counted into 
NUMB and NUMB + 1 will be re- 
quired. A binary- to-B CD routine and a 
display routine will also be required. 
The assembly language code will de- 
pend heavily on the particular micro- 
computer being used, so we leave this 
problem for the reader. The literature 
associated with the various machines 
will probably contain the necessary rou- 
tines if the machine's monitor does not. 
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The programs in listings 1, 2, and 3 
can be easily modified to measure the 
duration of a single logic-zero pulse. 
Rather than using the T2 timer to 
detect a pulse, the TTL-level signal is 
applied to the CB1 pin on the 6522. A 
negative transition on this pin starts 
the timing sequence, while a positive 
transition on this pin is used to ter- 
minate the timing. The program in 
listing 4 shows how the program in 
listing 1 was modified. Listing 4 may- 
be compared with listing 1 on a line-by- 
line basis. Note that the Peripheral 
Control Register is used to control the 
behavior of the CB1 pin. A diagram of 
the PCR register is shown in figure 8. 
Study it in connection with the pro- 
gram in listing 4. For this kind of 
measurement, the driver program 
(listing 3, for example) would not 
measure the period or the frequency; 
only the duration of the logic-zero pulse 
is of interest ; namely the quantity T. 
Specific machines will require different 
driver programs, and the design of such 
a program is left for the reader. 

A Brief Error Analysis 

The true time, T, shown in figures 1 
and 3, is not measured exactly by the 
programs described in this paper. The 



logic transitions that coincide with the 
events are detected by machine lan- 
guage loops, and the event can occur 
any time during the loop. However, 
timing start or end can only take place 
at the end of the loop. Call Tm the 
measured time. That is, Tm is the time 
that is output by the program. If T is 
less than 65536 clock cycles, then the 
precision of the measurement is plus or 
minus seven clock cycles. That is, 

Tm - 7Tc ± T < Tm + 7Tc 

where Tc is the period of the micro- 
computer system clock, typically one 
microsecond, but approximately 0.977 
microseconds for the Apple. The num- 
ber 7 is a result of the fact that the loop 
that detects the pulse is seven clock 
cycles long. 



If one or more interrupts from Tl 
have occurred, then an additional 
uncertainty is introduced because the 
last event may occur during an inter- 
rupt, but it will not be detected until 
the program returns to the BEQ LOAF 
loop in listing 1 . In the case of the Ap- 
ple, the IRQ-interrupt lasts about 55 
clock cycles. This gives the following 
inequality relating the measured time, 



Listing 3 




1 REM PRECISION TIMER PROGRAM 




20 PRINT "INPUT THE NUMBER OF EV 




ENTS. " 




25 PRINT "THIS NUMBER MUST BE LE 




SS THAN 65537. " 




30 INPUT N 




35 N = N - 1 




3E REM POKE N INTO TWO LOCATION 

S. 
40 NHI = INT <N / 256) 






45 POKE 2E,NHI 




50 NLO a CN / 256 - NHI) * 256 




55 POKE 25, NLO 




56 REM SET UP JUMP VECTOR. 




60 POKE 10,76: POKE 11,12: POKE 




12,25 




64 REM CALL PRECISION TIMER SUB 




ROUTINE. 




65 z = usr cm 




6S REM CONVERT NUMBER OF CLOCK 




CYCLES FROM HEXADECIMAL TD D 




ECIMAL. 




70 A = PEEK C27) 




75 B = 256 * PEEK <2S> + A 




S0 C = 65536 * PEEK (29) + B 




61 C = C / 1022714 




82 REM CLOCK FREQUENCY = 1.0227 




14 MHZ. 




85 D = UE777216 / 1022714)+ PEEK 




(30) 




90 T = D + C 




100 PERIOD = T / CN + 1) 




110 F = 1 / PERIOD 




120 PRINT "THE PERIOD IS "5PERI0 




D!" SECONDS. " 




130 PRINT "THE FREQUENCY IS ";F? 




" HERTZ. " 




140 GOTO 65 






USERS! 



READ . . 
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Tm, the true time, T, and the period of 














Listing 4: Source File — Pulse Timer 




the clock, Tc: 












Tm - 7Tc ± T ± Tm + 62Tc 




R804! 
RB05: 


2 TICL EQU 

3 TICH EQU 


&AS04 
*AS05 




illustrating that the time to process the 




RS06S 
RS0C: 


4 TILL EQU 

5 PCR EQU 


*AS0E- 
*AB0C 


? PERIPHERAL CONTROL REGISTER. 


interrupt routine, expressed in clock 
cycles, must be added to 7Tc to give the 




AS0B: 


7 ACR EQU 


*AS0B 




upper limit for T. 




AS0D: 


B IFR EQU 


$A80D 








AS0E: 


9 IER EQU 


*AS0E 




The precision of the measurement 
is 7% for an interval of 100 micro- 
seconds, 0.7% for an interval of 1000 
microseconds, 0.07% for an interval of 




0O1DS 

0000: 
0000 : 


15 TIME EQU *1D ^LOCATIONS *001B TO 

16 ;*001E CONTAIN THE FOUR-BYTE BINARY 

17 ', MEASUREMENT OF THE TIME, T. 


10,000 microseconds, etc. If T exceeds 
65535 microseconds, the uncertainty 




0000: 


IS '.THE LEAST-SIGNIFICANT 


BYTE IS IN *001B. 


increases. For example, if T is 100,000 




NIEXT OBJECT FILE NAME IS 

0300 : 20 ORG 


»ULSE TIMER 
$0300 




microseconds, the precision of the 
measurement is approximately 62/ 












100,000 or 0.062%. 




0300 : 


22 rtt*****"!****!!****** 

23 INTERRUPT ROUTINE 




Of course, it is being assumed, per- 




0300:48 


24 PHA 




5SAVE THE ACCUMULATOR ON THE STACK. 


haps incorrectly, that the system clock 




0301 :E5 ID 
0303 :D0 02 
0305 :ES IE 


25 INC 

26 BNE 


TIME 
BRl 


INCREMENT A TWO-BYTE 
; COUNTER FOR EACH 


frequency is known with an accuracy 




27 INC 


TIME+1 


;T1 INTERRUPT. 


that exceeds the precision. Experience 




0307: AD 04 AS 


28 BRl LDA 

29 PLA 

30 RTI 


TICL 


; CLEAR Tl INTERRUPT FLAG. 
;GET A FROM THE STACK. 


shows that the clock frequencies may 




030 A : SS 
030B :40 




be in error by as much as several hun- 












dred parts per million, or a relative 






32 *+=***:*** + *+*+: + ** 




uncertainty of approximately 0.03%. 




030C s 


33 5TIMER SUBROUTINE 




The user should be aware that the ab- 




030CJDS 


34 CLD 




! CLEAR THE DECIMAL MODE. 


solute accuracy of the system clock fre- 




030D:A2 FF 
030F:R9 40 


35 LDX 

36 LDA 


#*FF 
#$40 


;SET UP Tl TO RUN FREE 


quency may be an important factor in 




0311 :8D 0B A8 


37 STA 


ACR 




determining the accuracy of the results. 




0314: AS FE 


38 LDA 


#*FE 


?SET UP THE Tl TIMER 






03 16: 3D 06 AS 


39 STA 


TILL 


;WITH *FFFE. 






0319= R3 C0 


40 LDA 


#*C0 


; ENABLE IRQ FROM Tl. 


Applications 




031B:8D 0E AS 


41 STA 


IER 








03 IE: A3 00 
0320:85 ID 


42 LDA 

43 STA 


#00 
TIME 


; CLEAR TWO-BYTE 

; INTERRUPT COUNTER. 


We will assume that the machine- 




0322:85 IE 


44 STA 


TIME+1 


? DETECT NEGATIVE 

; CLEAR CB1 FLAG, IFR4, AND 


language timing program (listing 1 or 




0324= 3D 0C AB 
0327: A3 10 


45 STA 

46 LDA 


PCR 
#*10 


listing 2) is in place with the appro- 




0329: 3D 0D AS 


47 STA 


IFR 


;SET UP MASK TO TEST THE CB1 


priate interrupt vectors loaded, and 




032CJ2C 0D AS 
032FSF0 FB 
0331 :SE 05 fiS 


48 WAIT BIT 
43 BEQ 


IFR 
WAIT 


INTERRUPT FLAG, IFR4. 
?WAIT FOR ZEROTH EVENT. 


that a suitable driving routine (listing 




50 STX 


TICH 


? START THE TIMER. 


3, for example) is also in place. 




0334:58 


51 CLI 




TMAKE SURE IRQ IS NOT MASKED. 






0335 :8D 0D AS 
0338 : 3D 0C AS 


52 STA 

53 STA 


IFR 
PCR 


; CLEAR IFR4. 

? DETECT POSITIVE 


A. Frequency Counting 




033B:Efi 


54 NOP 

55 NOP 

56 LDA 




;TRANSITION ON CB1. 


Connect the source of the TTL- 




033C : EA 
033D:A9 10 


#*10 


;SET UP MASK FOR IFR4, 


level pulses to the PB6 pin on the 




033F:2C 0D AS 
0342 :F0 FB 
0344: AC 04 AS 


57 LOAF BIT 

58 BEQ 

59 LDY 


IFR 

LOAF 

TICL 


;THE CB1 FLAG. 

;WAIT FOR THE TRANSITION. 

JREAD THE LOW BYTE OF Tl. 


6522. The pulse source must pro- 
duce a square wave. Applying a SINE 




0347 :AE 05 AS 


60 LDX 


TICH 


5READ THE HIGH BYTE OF Tl . 


wave to a Schmitt-trigger circuit (a 




034A:7S 
034B=C0 04 
034D=B0 10 


61 SEI 

62 CPY 


#04 


;MASK INTERRUPTS. 

; ADJUST FOR READING HIGH BYTE AFTER 


74LS14 or a 555 timer configured as 




63 BCS 


ARND 


; READING THE LOW BYTE. 


a Schmitt trigger] will convert it to a 




034F:ES 
0350 :D0 0D 
0352 : 38 


64 INX 

65 BNE 

66 SEC 


ARND 


;MAKE CORRECTION TO THE HIGH BYTE. 
iDOES INTERRUPT COUNTER NEED 
; CORRECTION? YES, DECREMENT IT 


square wave. Enter the number of 
pulses you wish to count. The pro- 




0353 :A5 ID 


67 LDA 


TIME 


■,BY SUBTRACTING ONE. 


gram will measure the time required 




0355 :E9 01 


68 SBC 

69 STA 

70 LDA 


#01 

TIME 

TIME+1 




for the N pulses and output the fre- 




0357:85 ID 
0359 :A5 IE 




quency, f = N/T. For sub-audio fre- 




035B:E9 00 


71 SBC 


#00 




quencies you may wish to count only 




035D:85 IE 
035Fs84 IB 


72 STA 

73 ARND STY 


TIME+1 
TIME-2 


; STORE LOW BYTE. 


a few pulses, while for higher fre- 




0361:36 IC 


74 STX 


TIME-1 


; STORE HIGH BYTE. 


quencies a larger N will give more 




0363 :A9 FE 


75 LDA 


#*FE 

TIME-2 

TIME-2 


;FIND THE LOW COUNT. 


precise results. Although the max- 




03S5SE5 IB 
0367:85 IB 


76 SBC 

77 STA 


', STORE IT. 


imum number of pulses to be 




0369: A3 FF 


78 LDA 


#SFF 


;FIND THE HIGH COUNT. 


counted is 65536, the maximum fre- 




03GB :E5 IC 
036D-.85 IC 
03GF : G0 


79 SBC 

80 STA 


TIME-1 
TIME-1 


; STORE IT. 


quency of the pulses should not ex- 




81 RTS 






ceed about 35,000 Hz. The reason 












for this maximum is a result of the 




0370: 
0370 : 


83 ;LOAD *A67E AND *A67F 

84 ?*03, RESPECTIVELY, TO 


WITH *00 AND 
PRODUCE THE 


\ fact that there are about 28 clock 




0370: 


85 INTERRUPT 


SECTOR FOR 


THE SYM-1. 


cycles between the time that T2 is 




*** SUCCESSFUL 


ASSEMBLY: NO ERRORS 




loaded for the first time (line 45 in 
listing 1| and the time that it is 
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Figure 7; Diagram of the Peripheral Control Register (PCR) 

PERIPHERAL CONTROL REGISTER 



PCR7 



PCR6 



PCR5 



PCR4 



CB2 PIN CONTROL 

SET IFR3 ON NEGATIVE TRANSITION, 

CLEAR IFR3 WITH READ OR WRITE OF PBD. 
00 1 SET IFR3 ON NEGATIVE TRANSITION, 

CLEAR IFR3 BY WRITING ONE INTO IFR3. 
1 SET IFR3 ON POSITIVE TRANSITION, 

CLEAR IFR3 WITH READ OR WRITE OF PBD. 

11 SET IFR3 ON POSITIVE TRANSITION, 

CLEAR IFR3 BY WRITING ONE INTO IFR3. 

1 OUTPUT MODE. CB2 TO LOGIC ZERO WITH 

A READ OR WRITE OF PBD, RESET BY A 

CB1 TRANSITION. 
1 1 OUTPUT MODE. ONE CYCLE LOGIC ZERO 

PULSE FOLLOWING READ OR WRITE OF PBD. 
1 1 OUTPUT MODE. CB2 IS AT LOGIC ZERO. 
1 1 1 OUTPUT MODE. CB2 IS AT LOGIC ONE. 



PCR3 



PCR2 



PCR1 



PCR0 



■ CA1 PIN INTERRUPT CONTROL 

= IFR1 SET ON NEGATIVE EDGE 

1 = IFR1 SET ON POSITIVE EDGE 



-CA2 PIN CONTROL 
SET IFR0 ON NEGATIVE TRANSITION, 

CLEAR IFR0 WITH READ OR WRITE OF PAD. 
00 1 SET IFR0 ON NEGATIVE TRANSITION, 

CLEAR IFR0 BY WRITING ONE INTO IFR0. 
1 SET IFR0 ON POSITIVE TRANSITION, 

CLEAR IFR0 WITH READ OR WRITE OF PAD. 

11 SET IFR0 ON POSITIVE TRANSITION, 

CLEAR IFR0 BY WRITING ONE INTO IFR0. 

1 OUTPUT MODE. CA2 TO LOGIC ZERO WITH 

A READ OR WRITE OF PAD, RESET BY A 

CA1 TRANSITION. 
1 1 OUTPUT MODE. ONE CYCLE LOGIC ZERO 

PULSE FOLLOWING READ OR WRITE OF PAD. 
1 1 OUTPUT MODE. CA2 IS AT LOGIC ZERO. 
1 1 1 OUTPUT MODE. CA2 IS AT LOGIC ONE. 



■ CB1 PIN INTERRUPT CONTROL 

= IFR4 SET ON NEGATIVE EDGE 

1 = IFR4 SET ON POSITIVE EDGE 



Figure 8: A Circuit to Debounce a Switch 
for a Stopwatch 



2 74LS00 JO"- 



E 



-fpBJ> 



V GND 



Figure 9: A Tempera ture-to- Frequency Converter 

0+5V 



, 2KOHM 



9KOHM 



13 



AD 537JD 



10KOHMS 



14 



PB6> F = Hz/°K 



11 



1_ 



12 



0.01 hF 
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Figure 10: A Photo-diode, Phototransistor Array 
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CATHODE 



FAIRCHILD FPA106 



74C14 

SCH MITT TRIGGER 



reloaded (line 55 in listing 1). If a 
pulse occurs in this interval, it will 
not be counted, and the degree of er- 
ror that is then introduced depends 
on the total number of pulses that 
are counted. If the pulse count is 
large, say 10,000 or more, this error 
may be negligible, but the user 
should be aware of its existence. 

B. A Stop Watch 

Enter "1" when the program re- 
quests the number of events. A 
suitable circuit to generate starting 
and stopping pulses with a mechani- 
cal switch is shown in figure 9. Each 
time the switch is connected to its 
N. O. (normally open) position, the 
output of the circuit goes to logic 
zero. The first closure initiates the 
timing sequence, the next closure 
terminates it. You may wish to 
modify the driving program to 
reflect the fact that you are measur- 
ing time rather than frequency. 

C. Measuring Temperature 

To measure temperature a T/F 
integrated circuit is used. In this 
case an Analog Devices (Route 1 In- 
dustrial Park, Box 280, Norwood, 
MA 02062) AD 537 was used in its 
temperature-to-frequency mode. 
The circuit diagram is given in 



figure 10. The AD 537 specification 
sheet, which you should request 
when you order the device, contains 
the necessary information to con- 
vert the pulse train from the device 
to a Kelvin, Celsius, or Fahrenheit 
temperature to be output from your 
microcomputer. 

It should be clear that any 
voltage-to-frequency converter can 
be used with a variety of transducers 
to make measurements of physical 
quantities with these programs. 



D. Tachometry 

Another application involves 
measuring the rotation rate of a 
gear, fan, or wheel. A photodiode 
and a phototransistor make a 
suitable pickup device. Refer to the 
circuit in figure 11. A reflective sur- 
face on the rotating object passes 
near the diode-transistor pair once 
each rotation. Light emitted by the 
photodiode is reflected to the 
phototransistor and it conducts. The 
voltage across the 25 kohm poten- 
tiometer rises during each light 
pulse. A CMOS Schmitt trigger, the 
74C14, will help to clean up the 
potentially noisy waveform from 
the phototransistor, producing a 
clean negative pulse for each pass of 
the reflecting surface. The pulses are 



counted and timed by the programs, 
and the rotation rate is the same as 
the frequency of the pulses. 

If a piece of paper that had alter- 
nate dark and light strips on it were 
passed near the diode-transistor ar- 
ray, the pulse train frequency ap- 
pearing on the PB6 output would be 
directly proportional to the velocity. 
With suitable modifications, there- 
fore, the circuit in figure 1 1 and the 
programs in the listings are capable 
of measuring velocity. 

The applications just suggested 
should generate some ideas for your 
own applications. The focus of this 
paper has been the assembly language 
programs that can be used to make 
precise measurements of either time or 
frequency with the simplest possible 
hardware (one connection to the PB6 
pin) requirements. 
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Chances are, when you 
bought your first disk drive, it 
was an Apple, Now that you're 
ready for a second, take a look 
at Quentin. 

Our Apple* - Mate™ 5 1 A " Disk 
Drive is fully software transparent 
with Apple's DOS 3.3 operating 
system in full and half track 
operation. 

Add it to your present drive for 
greater capacity and faster access. 
Just plug it in and go to work. 

And the Apple-Mate has these 
High Performance advantages: 

ON TRACK HEAD SEEK 

A precision lead screw positions 
the head onto the correct track. 
Time-consuming retries and 
disk-to-disk copying errors are 
virtually eliminated. 

SIEMENS DISK DRIVE 

The apple-beige unit is built 



Siemens system with over 
10,000 lifetime hours. Shielded 
connecting cable also attached. 

LONG TERM 
DEPENDABILITY 

MTBF ( Mean Time Between 
Failures)— 8,500 power-on hours, 
and the unit has a one-year 
warranty. 

COUNT ON QUENTIN 
FOR QUALITY 

Quentin Research was building 
disk systems for the computer 
industry when Apple was a little 
bud on the big computer tree. 
We're known for product reliabil- 
ity and stand behind every system 
we sell you. 

But the best news may be the 
price—only $335.00 (40 tracks). 



A special introductory offer 
when you order Apple- Mate 
directly from us. 

So when you're ready to boost 
the j uice on your Apple, add-on 
the Quentin Apple-Mate. 

To order: Check, money order; 
Visa or Mastercard number: Calif, 
residents add 6% sales tax. 
Allow one week delivery. 



m SEARCH, INC.~^ 

19355 Business Center Drive 
Northridge, California 91324 
(213) 701-1006 



Special 
Introductory 
Price: 
$335.00 



® Apple is a registered trademark of Apple Computer, Inc 
t Siemens is a trademark of Siemens Corporation. 
* Apple- Mate is a trademark of Quentin Research, Inc., 
which does not manufacture Appie computers. 
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Removing Frustrating 
Interference 



by Patrick E. Hamel 



Several techniques for 
minimizing interference with 
single board computers are 
discussed. The AIM 65 is used 
as an example. 

RFI (radio frequency interference) is a 
two-way street. Radiations from your 
computer can cause interference to 
your radio and television reception, 
while radiations from an older televi- 
sion set, amateur or citizens band 
radios, or even your video display can 
cause loss of data. 

By using some basic principles we 
can avoid the cost of one of the new 
"FCC-accepted" computers and enjoy 
interference-free computing. The first 
principle is that wires do not really act 
like antennas (transmit or pick up in- 
terference! if there is a ground plane 
provided near them. This means that 
either a metal case, special ground layer 
on the circuit board, or shielded wires 
will remove or reduce interference. 

If your circuit board has a special 
grounding layer, it probably has no 
radiation problem. If you make custom 
boards, leave one side as the ground 
plane. But how do you provide a ground 
plane for an existing board without 
shorting out the components? The 
safest way is to mount the board about 
1/16 inch above a metal case, after in- 
suring that the components will not 
short out if the case on the board flexes. 
For checking clearances, I recommend 
one of the $1.00 dental mirrors sold at 
the drugstore. 

For the plastic case computer, I sug- 
gest a sandwich of poster-board, 
fanned-out stranded wire, aluminum 
foil, more fanned-out stranded wire, 
and more poster-board glued together. 
Be sure to hook the ends of the wires to 
the ground connection to shield the 
board. 

The circuit board itself is probably 
not the major source of interferences; 
the flat- cables we use to hook up exter- 
nal tapes, disks, or displays usually 




cause or pick up most of the inter- 
ference. The simplest answer is to pay 
extra and order shielded flat cable (there 
is such a thing) with each add-on. 

It is also very easy to shield existing 
flat cable. Almost any drug store sells 
aluminum tape for muffler or ducting 
repair; simply cover the cable with the 
tape (both sides). To ground the shield 
either solder a wire to a paper clip or 
use alligator clips from the tape to your 
system ground. 

A second principle is to keep the 
signals inside the case — mount dis- 
plays and keyboards inside the enclo- 
sure rather than on the outside surface. 



AIM 65 — An Example 

The scanning keyboard on the AIM 
can cause interference on a TV set at 
about 60 feet if an 18-inch cable is used 
between the main board and keyboard. 
This fact led to development of the 
enclosure in the picture. I ordered the 
case from a local TV parts store and did 
all work with hand tools. The paper roll 
hanger flip-up hatch may not be a good 
idea to duplicate because it limits room 
for expansion. The use of microphone 
connectors for the tapes is the result of 
many bad experiences with non-audio- 
rated connectors. 

Now I can record, load, and com- 
pute one foot from an operating ama- 
teur transmitter, while the kids watch 
TV, all interference free. 



Pat Hamel has been involved with 
computers since 1963, when he became an 
instructor on the old tube-type "Sage." He 
is currently involved with PLC 
Applications in support of the Shuttle 
Program. The AIM serves as a personal 
accounting device and development tool. 
You may contact Mr. Hamel at 1157 E. 
Old Pass Rd., Long Beach, MS 39560. 
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NEW FROM D & N MICRO PRODUCTS, INC. 




MICRO-80 COMPUTER 



Z80A CPU with 4MHz clock and CP/M 2.2 
operating system. 64K of low power static 
RAM. Calendar real time clock. Centronics 
type parallel printer interface. Serial inter- 
face for terminal communications, dip 
switch baud rates of 150 to 9600. 4 "cooling 
fan with air intake on back of computer and 
discharge through ventilation in the bot- 
tom. No holes on computer top or side for 
entry of foreign object. Two 8" single or 
double sided floppy disk drives. IBM single 
density 3740 format for243K of storage on 
each drive. Using double density with 1K 
sectors 608K of storage is available on a 
single sided drive or 1.2 meg on a double 
sided drive. Satin finish extruded 



aluminum with vinyl woodgrain decorative 
finish. 8 slot backplane for expansion. 48 
pin buss is compatible with most OSI 
boards. Uses all standard IBM format CP/M 
software. 

Model 80-1200 $2995 

2 8" single sided drives, 1.2 meg of 
storage 
Model 80-2400 $3495 

2 8" double sided drives, 2.4 meg of 

storage 
Option 001 $ 95 

Serial printer port, dip switch baud rate 

settings 



Microsoft 

Basic-80 

BasicCompiler 

Fortran-80 

Cobol-80 

Macro-80 

Edit-80 

MuSimp/MuMath 

Mu Lisp-80 



Software available in IBM single density 8" format. 





Digital Research 


$289 


PL/1-80 


$329 


Mac 


$410 


Sid 


$574 


Z-Sid 


$175 


CBasic-2 


$105 


Tex 


$224 


DeSpool 


$174 


AshtonTate 




dBase II 





Micropro 


$459 


Wordstar 


$ 85 


Mail-Merge 


$ 78 


Spellstar 


$ 95 


SuperSortl 


$110 


Pascal 


$ 90 


Pascal/MT + 


$ 50 


PascalZ 




Pascal M 



$299 
$109 
$175 
$195 

$429 
$349 
$355 



$595 



Convert almost any static memory OSI machine to CP/M® with the D & N-80 CPU Board. 



Z80A CPU with 4MHz clock. 2716 EPROM 
with monitor and bootstrap loader. RS-232 
serial interface for terminal communica- 
tions or use as a serial printer interface in a 
VIDEO system. Disk controller is an Intel 
8272 chip to provide single or double densi- 
ty disk format. 243K single density or 608K 
double density of disk storage on a single 
sided 8" drive. A double sided drive pro- 
vides 1.2 meg of storage. DMA used with 
disk controller to unload CPU during block 
transfers from the disk drives. Optional 
Centronics type parallel printer port com- 



plete with 10 ft. cable. Optional Real Time 
Calendar Clock may be set or read using 
'CALL' function in high level languages. 
Power requirements are only 5 volts at 1.4 
amps. Available with WORDSTAR for serial 
terminal systems. 



D&N-80 


serial 


$695 


D&N-80 


serial w/Wordstar 


$795 


D&N-80 


video 


$695 


Option 001 


$ 80 




parallel printer and real time 




calendar clock 






D & N-80 CPU BOARD 



OTHER OSI COMPATIBLE HARDWARE 



IO-CA1 OX Seria I Printer Port $1 25 

Compatible with OS-65U and OS-65D soft- 
ware 

IO-CA9 Parallel Printer Port $175 

Centronics standard parallel printer inter- 
face with 10 ft. flat cable 
BP-580 8 Slot Backplane $ 47 

Assembled 8 slot backplane for OSI 48 pin 
buss 



24MEM-CM9 $380 

16MEM-CM9 $300 

8MEM-CM9 $210 

BMEM-CM9F $ 50 



24MEM-CM9F $530 

16MEM-CM9F $450 

8MEM-CM9F $360 

FL470 $180 



24K memory/floppy controller card sup- 
ports up to 24K of 21 14 memory chips and 
an OSI type floppy disk controller. 
Available fully assembled and tested with 
8, 16, or 24K of memory, with floppy con- 
troller (F). Controller supports 2 drives. 
Needs separated clock and data inputs. 
Available Bare (BMEM-CM9F) or controller 
only (FL-470). Ideal way to upgrade 
cassette based system 



C1PEXP Expansion Interface $ 65 

Expansion for C1 P 600 or 610 board to the 
OSI 48 pin buss. Requires one slot in 
backplane. Use with BP-580 backplane 
BIO-1600 Bare IO card $ 50 

Supports 8K of memory, 2 16 bit parallel 
ports may be used as printer interfaces. 5 
RS-232 serial ports, with manual and Molex 
connectors 

DSKSW Disk Switch $ 29 

Extends life of drive and media. Shuts off 
minifloppy spindle motor when system is 
not accessing the drive. Complete KIT and 
manual 

D & N Micro Products, Inc 

3684 N. Wells St. 
Fort Wayne, Ind. 46808 
■ ] ^ mm (219)485-6414 

VISA 



TERMS $2.50 shipping, Foreign orders add 15%. 
Indiana residents add 4% sales tax. 



Disk Drives and Cables 

8" ShugartSA801 single sided $395 

8 "ShugartSA851 double sided $585 

FLC-66ft.cablefromD&NorOSI $ 69 

controller to 8" disk drive 
5 1/4" MPI B51 with cable, power $450 

supply and cabinet 
FLC-5 1/48 ft. cable for connection $ 75 

to 5 1/4 drive and D & N or OSI 

controller, with data separator and 

disk switch 
Okidata Microline Printers 
M L 82A Dot Matrix Printer $534 

120 CPS, 80/120 columns, 9.5" paper width, 
friction or pin feed 

ML 83A Same as 82A except $895 

16" paper width, 132/232 columns with 
tractor feed 

ML84Sameas82Aexcept200CPS, $1152 
16" paper width, 132/232 columns, 2K buf- 
fer, dot addressable graphics, with tractor 
feed 
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An Overview of Apple DOS 

by David P. Tuttle and Dr. Thomas Cleaver 



This overview attacks the 
mystery of providing general 
information on the functional 
blocks of code in DOS. This 
article will enable the Apple user 
to manipulate DOS, permit DOS 
modification, and allow 
machine-language access to 
DOS commands. 



Apple has made its Disk Operating 
System (DOS) user-friendly. One need 
know nothing of the internal functions 
of DOS in order to execute RUN, SAVE, 
MON, or any other DOS command. But 
an understanding of DOS internals may 
be required if you are concerned with: 



3. Memory size is 48K. 

4. MAXFILES not changed (default = 3). 

5. Master diskette is used. 

6. Disk controller is in slot 6. 

7. Language system is not installed. 



Included in this review will be the 
"boot-up" sequence, the "idle" se- 
quence, a list of contents and uses for 
the buffers, and a list of routines by ad- 
dress and function. Also included is a 
short explanation of how data is actually 
stored on the disk. 



• Determining memory use by DOS. The "Boot-Up" Sequence 



• Executing DOS commands from the 
monitor — or from an assembly- 
language program. 

• Customizing DOS to use your own 
command names and error messages. 

• Rewriting DOS to make it uncopyable. 

• Retrieving information from a "clob- 
bered" disk. 

The purpose of this article is to 
discuss the internal workings of DOS 
and to catalog its functions. Toward 
this end, we have spent a good deal of 
time poking and prying into the code. 
However, there are still some blank 
spots and ambiguities in our under- 
standing and there may even be some 
errors. Therefore, we ask you to be char- 
itable in your assessment of our work. 

In order to keep things simple and 
to minimize documentation, we have 
made certain assumptions and 
simplifications: 

1. All addresses and data are in hex. 

2. The version of DOS used is 3.3 (but 
most of the code is identical to DOS 
3.2). 



To initiate the DOS boot-up pro- 
cedure, just turn on the power switch 
(if you have the autostart ROM). From 
the monitor, one may either type 6 
CTRL-P <Return>, 6-CTRL-K 
< Return > , or C600G < Return > . Six 
is the slot number where the DOS 
ROM (Read Only Memory) card 
resides, and $C600 is the start of its 
memory locations. 

The DOS ROM at $C600 starts the 
disk spinning and then reads track 0, 
sector of the disk and stores it at 
$800-8FF. The code beginning at $801 
is then executed. $801-84A reads in 
$3600-3FFF (the Read Write Track Sec- 
tor (RWTS) Routine) by using DOS 
ROM at $C65C. Data at $350-$3FF are 
altered during this procedure. At $84A, 
a jump to $3700 is encountered. 

$3700-3747 loads in the rest of DOS 
(on tracks 0, 1, and 2) at $1600-35FF. 
Included is an initialization routine in 
user Buffer #1 at $1B00. At $3747, a 
jump to $1B03 is encountered. $1B00- 
1C25 simply does some initialization 
when retrieving DOS from the disk; 
this code is never used again. A jump to 
$1D84 is encountered at $1B61 or 
$1C25 ($1C25 jumps to $1E25 which, 
in turn, is a jump to $1D84). $1D84 is 



the "hard entry point' ' to DOS. The en- 
tire DOS package is then moved from 
$1600-3FFF to $9600-BFFF. This is the 
top of RAM (Random Access Memory). 

Next, the type of BASIC to be used 
is found (Applesoft or Integer BASIC). 
At $9E20-9E40 DOS checks to see if 
this is the first pass through this code 
since boot-up. If it is, then the greeting 
program (usually "Hello") is run. This 
greeting program is the one that was 
entered when the disk was INITialized. 
DOS enters the name of the greeting 
program into File Name Buffer #1 
($AA75-AA92), and then loads #06 into 
$AA5F (which is the command code 
number for the RUN command). It 
then jumps to $A180 to execute the 
RUN command of the greeting program 
whose name is now in File Name Buffer 
#1. DOS then utilizes the subroutines 
at $A180 (a) to match the command 
code number (in $AA5F, see table 2) 
with the appropriate entry point; (b) to 
put that entry point on the top of the 
stack; and (c) to jump to that entry 
point (plus one) by executing an RTS 
(return). After RUNning the greeting 
program, DOS jumps to $9E81, the 
DOS idle routine. 



DOS Idle Sequence 

When the cursor is flashing and the 
Apple is waiting for you to do some- 
thing, the Apple is "idling." DOS nor- 
mally idles at $9E81-9EBF. This is the 
input character routine. Here the cur- 
sor is put on the screen, characters are 
echoed to the screen from the key- 
board, and characters are stored in the 
key-in buffer. For most commands 
keyed in, this also loads #$03 in $AA52 
(which selects the machine state of 
DOS, see table 2), which in turn selects 
DOS #3. The program eventually 
jumps to $9EBD. Every time a charac- 
ter is to be output, this routine is 
called. The output "hook" at $0036, 
0037 also points to $9EBD to output a 
character in the accumulator. A hook is 
a pointer at an address, such as 
$0038,0039 for the input hook, which 
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points to another address for an indirect 
jump. $9EBD-9ED0 pushes an address 
from the state machine table (table 2, 
$9D10-$9D1D| onto the stack and then 
RTS's to jump to that address plus one. 
This selects DOS state 0-6 by indexing 
down the table ($AA52 contains the in- 
dexing number]. DOS state #3 
(< $AA52 = 3>) is normally selected. 

DOS state #3 ($9F2F) can do one of 
three things: 

a) output unconditionally (print some- 
thing) 

b) output on the condition that MON C 
bit is set 

c) decode key- in buffer as command via 

$9F15 (DOS #1) 

DOS #3 checks for a < carriage 
return > . If it finds one, it then jumps 
to $9F15. The code at $9F15-9F22 even- 
tually causes a jump to $9FCD, which 
decodes the string of characters in the 
key- in buffer. 

Command decoding occurs at 
$9FCD. If errors are encountered, the 
program jumps to the error-processing 
routine at $A6D2. Otherwise, $AA5F is 
given the appropriate "command code 
number." $AA5F is then used to index 
down table 3 to get the corresponding 
entry point of the command to be ex- 
ecuted. The program next jumps to 
$A180, where it pushes the command 
entry point (high and low order bytes) 
on the stack, and then jumps to the en- 
try point plus one by executing an RTS. 

The DOS Tables 

The tables included with this article 
should provide enough information to 
understand the internal workings of 
DOS. You should find them useful to 
trace the path of a command as it is ex- 
ecuted by DOS, or to modify DOS for 
your own purposes. 



References 

1. Fort Worth Apple User's Group 
(FWAUG), June - October 1980. 

2. Roe, David, "Sixteen vs. Thirteen," 
LAUGHS, Louisville Apple Users 
Group, 2, 4, Sept. 1980. 



David P. Tuttle and Dr. Thomas Cleaver 
may be contacted at the Department of 
Electrical Engineering, University of 
Louisville, Louisville, KY 40292. 



Table 1: Miscellaneous Addresses in DOS 

Note: The contents are stored in two consecutive bytes, low order byte first. 

Table Address 
(Entry Point) 

9D00 
9D02 
9D04 
9D06 
9D08 
9D0A 
9D0C 
9D0E 



Contents 


Description 


9CD3 


File Buffer #1 


9E81 


Input character routine 


9EBD 


Output character routine 


AA75 


Filename Buffer #1 


AA93 


Filename Buffer #2 


AA60 


LENGTH of load 


9D00 


Beginning of DOS 


B5BB 


End of system buffer 



Table 2: State Machine Table (categorizes the functions of DOS) 

$AA52 is used to index down $9D10 - 9D1C and find the entry point. 
$9EC0 - $9ED0 takes entry point, shoves it on the stack, and then jumps to 
it (plus one) by executing an RTS. 



Table Address 

9D10 

9D12 



Contents 
(Entry Point) 

9EEB 
minus 1 



9F12-1 



Description 

DOS #0(<$AA52> = 0): 
Default value on DOS entry 
(set at $9DDA). Also used at 
front of line output from a 
program. 

DOS #1 (<$AA52> = 1): 
Outputting CTRL-D line from 
program; collect the line for 
decoding. 



9D14 


9F23 - 1 


DOS #2 (<$AA52> = 2): 
Outputting normal line from 
program. Print to the output 
device. 


9D16 


9F2F - 1 


DOS #3 (<$AA52> = 3): 
Output a character being 
echoed from the input routine 
(keyboard or EXEC file). Can 
do one of three things: 

a) output unconditionally, 

b) output on the condition that 
MON C bit is set, 

c) decode keyin buffer as 
command via $9F15. 


9D18 


9F52-1 


DOS #4 (<$AA52> = 4): 
"WRITE" is active, middle of 
line, states 4 and 5 work 
together to output to the disk 
until a line comes along with a 
CTRL-D in the front. 


9D1A 


9F61 - 1 


DOS #5 (<$AA52> = 5): 
"WRITE" is active, front of 
line, then go to DOS #4. 


9D1C 


9F71-1 


DOS #6 (<$AA52> = 6): 
Echoing character input from 
"READ" file. Ignore character 
for DOS command purposes. 
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1 Mhz- 12 Bit A/D 

for your Apple II Computer 

The APPLESCOPE-H R1 2 analog to digital converter uses 
a high stability buried zener voltage reference and a flash 
A/D to give 1 2 bit accuracy with a 1 4 bit dynamic range. 

• DC to 1 Mhz Programmable Sample Rate 

• 2048 Sample Buffer Memory 

• Pretrigger Viewing 

• Continuous or Single Sweep 

• 4 Channel Software Support 
(requires additional power supply) 

• External Trigger Input 

The standard software provided with each APPLESCOPE- 
HR 1 2 includes all of the functions necessary to turn your 
Apple II computer into a high quality digital storage 
oscilloscope. In addition all of theSCOPE DRIVERoptions 
are being up-graded to handle the higher resolution data. 
Price per cnannei $695 



The original APPLESCOPE still provides the optimum 
price/performance trade off for those users requiring 8 bit 
converter resolution. 

APPLESCOPE INTERFACE 




DC to 3.5 Mhz sample rate 

• 1 024 byte buffer memory 

• Pretrigger Viewing 

• Programmable Scale Select 

• Continuous and Single Sweep Modes 

• Single or Dual Channel Trace 

Price for the two board Applescope system is $595 
EXTERNAL TRIGGER ADAPTER $29 



SCOPE DRIVER Advanced software forthe APPLESCOPE 
analog to digital converters makes full use of the computing 
power of the Apple il to create a total data acquisition 
system. Available options include: 

• Signal Averaging-Acquires 1 to 999 signal sweeps and 
displays the averaged result. 

• Digital Volt Meter- Allows use as real time DVM or use to 
measure points on an acquired sweep, 

• Disk Storage - Allows automatic storage and recover of 
acquired data on floppy disks. 

• Spectrum Analyzer-Calculates and displays frequency 
spectrum of acquired data. 



-! -, -, -™7 E 1 \ , , 
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BUS RIDER 
LOGIC ANALYZER for the APPLE II 

The BUS RIDER circuit card silently rides the Apple II 
peripheral bus and allows real time tracking of program 
flow. Software provided allows set up of trace parameters 
from the keyboard and read back of disassembled code 
after a program has been tracked. 

• 32 bit by 51 2 sample memory buffer 

• Monitors Data and Address bus plus 8 external inputs 

• Trigger on any 32 bit word or external trigger 

• Pretrigger viewing 

The BUS RIDER is an invaluable development tool for 
anyone working with Apple II or Apple II+ computers. 
Price S395 

RC ELECTRONICS INC. 

7265 Tuolumne Dr., Goleta, CA 931 17 

(805)968-6614 
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Table 4: Vectors for Various Languages 



Vectors are used by DOS to interface with the supported languages 
(Applesoft ROM, Applesoft RAM, and Integer BASIC). DOS uses these 
addresses to jump into the language when RUNning (or CHAINing in the 
case of Integer BASIC) a new program, or when processing errors. Errors may 
occur during program execution or at the command level. (Applesoft also 
has a 6th vector to relink the pointers in each program line so the program 
source doesn't need to be loaded with the program start address each time. 
This is used throughout DOS.) 



Current Language (Applesoft or Integer BASIC) 



Table Address 

9D56 
9D58 
9D5A 
9D5C 
9D5E 
9D60 



Contents 
(Entry Point) 

(Moved in from 
below tables 
when needed, 
initially zero) 



CHAIN entry 
RUN entry 
Error entry 
Hard entry 
Soft entry 
Recompute links: 
(Applesoft only) 



Integer BASIC (moved in above when needed) 



Table Address 

9D62 
9D64 
9D66 
9D68 
9D6A 



Applesoft ROM (moved in above when needed) 



Contents 




(Entry Point) 




E836 


CHAIN 


A4E5 


RUN 


E3E3 


Error 


E000 


Hard entry 


E003 


Soft entry 


0000 


Not used 



Table Address 


Contents 
(Entry Point) 




9D6C 


A4FC 


CHAIN (actually RUN) 


9D6E 


A4FC 


RUN 


9D70 


D865 


Error 


9D72 


E000 


Hard entry 


9D74 


D43C 


Soft entry 


9D76 


D4F2 


Recompute links 



Applesoft RAM (disk version moved in above when needed) 



Table Address 


Contents 
(Entry Point) 




9D78 


A506 


CHAIN 


9D7A 


A506 


RUN 


9D7C 


1067 


Error 


9D7E 


9D84 


Hard entry 


9D80 


0C3C 


Soft entry 


9D82 


0CF2 


Recompute links 



Note: All addresses in hex, low order then high order bytes at the addresses 
in the table. 
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Table 5: Miscellaneous Variables 

CONTENTS DESCRIPTION 
(TYPICAL) 



AA4F 

AA51 
AA52 
AA53 
AA55 
AA57 
AA58 
AA59 
AA5A 
AA5B 
AA5C 
AA5D 
AA5E 
AA5F 
AA60 

AA62 
AA63 
AA64 



982D 

00 

0006 
FDFO 
FD18 

03 

03 

00 

00 

00 

00 

06 

00 

00-36 

11B4 

00 
00 
00 



AA65 


00 


AA66 


0000 


AA68 


0001 


AA6A 


0006 


AA6C 


0001 


AA6G 


0000 


AA70 


0000 


AA72 


0800 


AA74 


OC 


AA75 


30 


AA93 


30 


AAB1 


03 


AAB2 


8M 


AAB3 


00 


AAB4 


0000 


AAB6 


00 


AAB7 


00 


AAB8 




AAC1 


B7E8 


A AC 3 


B3BB 


AAC5 


B4BB 


AAC7 


C000 



Current file buffer 
pointer 
Input state 
Output state 
Output hook 
Input hook 
No. of buffers 

Save S register 

Save X register 

Save Y register 

Save A register 

Line buffer displacement 

MON-NOMON Values 

Command code // 

Block length for LOAD 

and BLOAD 
Holds AA5F for a time 
Temporary 1A 
Temporary 2A 
Command input option 
Command volume 
Command drive 
Command slot 

Command L value (length) 
Command R value (record) 
Command B value (byte) 
Command A value (address) 
CIO bits 

File name buffer //1 
File name buffer #2 

(for RENAME) 
Number of default file buffers 
Command chain (CTRL-D) 
EXEC file state 
EXEC file buffer pointer 
Applesoft/Integer BASIC 

switch. 
00 - Integer BASIC 
HO - ROM Applesoft 
80 - RAM Applesoft 
Applesoft begin run switch 

$00-NO. $40,$80=YES 
"Applesoft" in modified ASCII 

(bit 7 high of each byte) 

RWTS buffer (IOB) 

VTOC buffer 

SYS. buffer 

Top of RAM(+1)(last byte of DOS) 



Table 6: I/O Package Commands 

This table is used at $AB14 to $AB1E to jump to the correct 
1/0 routine. $B5BB is used to choose which 1/0 routine will be 



TABLE ADDRESS 

AAC9 
AACB 
AACD 
AACF 
AAD1 
AAD3 
AAD5 
AAD7 
AAD9 
AADB 
AADD 
AADF 
AAE1 
AAE3 



CONTENTS 
(ENTRY POINT) 
B37F minus 1 
AB22-1 
AC06-1 
AC58-1 
AC70-1 
AD2B-1 
AD98-1 
ACEF-1 
ACF6-1 
AC3A-1 
AD12-1 
AE8E-1 
AD18-1 
B37F-1 



DESCRIPTION 

Good return (dummy) 
OPEN file 
CLOSE file 
READ from file 
WRITE to file 
DELETE file 
Print CATALOG 
LOCK a file 
UNLOCK a file 
RENAME a file 
POSITION file 
Format disk (INIT) 
VERIFY file 
Good return (dummy) 



Table 7: Read Commands 



This table is used at $AC58 to $AC69 to jump to the correct 
read routine. $B5BC 13 used to index to the correct entry point 
address. 



TABLE ADDRESS 



AAE5 
AAE7 
AAE9 
AAEB 
AAED 
AAEF 



CONTENTS 
(ENTRY POINT) 

B37F-1 
ACBA-1 
AC96-1 
AC87-1 
AC93-1 
B37F-1 



DESCRIPTION 



Good return 
Read next byte 
Read next block 
Read specific byte 
Read specific block 
Good return (dummy) 



Table 8: Write Commands 

Thi3 table is used at $AC70 to $AC86 to jump to the correct 
write routine. Again $B5BC determines which routine to jump to. 



TABLE ADDRESS 

AAF1 
AAF3 
AAF5 
AAF7 
AAF9 
AAFB 



CONTENTS 
(ENTRY POINT) 
B37F-1 
ACBE-1 
ACCA-1 
ACBB-1 
ACC7-1 
B37F-1 



DESCRIPTION 

Good return 
Write next byte 
Write next block 
Write specific byte 
Write specific block 
Good return (dummy) 



Note: Low order byte first then high for the addresses in the 
table. 





THE NEW MACRO-ASSEMBLER FROM SDS 
PERFORMS ASSEMBLY LANGUAGE MAGIC FOR YOU! 



Makes Assembly Language program- 
ming easy for the novice as well as the 
experienced programmer. 
USER ORIENTED — manual includes 
many examples plus supplemental in- 
formation. 

MERLIN is not only FAST, but also has 
an extremely POWERFUL EDITOR. 
Nearly a dozen edit commands include 
block copy or move, line/character 
insert/change/remove, and a find & re- 
place function that makes it easy to 
modify existing files. 

WHEN IT'S A PROGRAMMING 
CONTACT THE APPLE UTILITY 

P.O. Box 582-M • Santee, CA 



Full Macro capabilities. 
28 Pseudo-ops, conditional assem- 
bly, arithmetic support. 
Supports 80 column and RAM cards 
when present. 

Compatible with TED II + files; can 
optionally be used to read, create 
and edit standard sequential text 
files. 

SPECIAL BONUS: Also included is 
SOURCEROR which creates labeled 
source files from raw binary object 
code. 



TOOL YOU NEED, 
EXPERTS — SDS! 

92071 . 714/562-3670 



SR1.95 




data svstems 
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A harvest of 
savings from 




ApplepQfTtee 
Electronics 



SOFTWARE 



APPLE* ATARI* TRS80 • IBM 

A full line of software for business, games 
and education Up to 35% off! 



MGSE 


IQS 


VISICORP 


STONEWARE 


ONLINE 


SYNERGISTIC 


EDO-WARE 


HAYDEN 


HOWARD 


AND MANY MORE 



HARDWARE 



AMDEK - HAYES • MICROSOFT 

List Our Price 

32K RAM card $293.00 $205.00 
Video Term $345.00 $279.00 
Lazer Products 20% off 



DISKS 



Maxell Boxofl0,5/ 4 ",SS-DD $35.00 
Verbatim Box of 10, 514", SS-DD $29.00 



MONITORS 



Our Price 
$159.00 
$169.00 



LE MONITORS List 
9" Green $189.00 

12" Green $199.00 

ZENITH 

12" Green $179.00 $129.00 

Plus a full line of AMDEK Monitors 



PRINTERS 



PAPER TIGER 


List 


Our Price 


460G 


$1,094.00 


$950.00 


560G 


$1,394.00 


$1,250.00 


EPSON 






MX 70 


$449.00 


$395.00 


MX80FT 


$745.00 


$595.00 


MX100FT 


$945.00 


$795.00 



CALL FOR THIS MOIYTHS SPECIAL ! 



1-800-835-2246 EXT. 211 

OR 

702-452-5589 



5130 East Charleston Blvd. 
Suite SMI 

Las Vegas, Nevada 89122 



fft jSa 



Phone orders welcome. Mail orders may send 
charge card number (include expiration date), 
cashiers check, money order or persona! check 
(allow ten business days for personal or com- 
pany checks to clear). Add $3.00 for shipping, 
handling and insurance. Nevada residents add 
5.75% sales tax. Please include phone number. 
All equipment is in factory cartons with manu- 
facturers warranty. Equipment subject to price 
change and availability. Call or write for price list. 



Table 9: Encoded Nibbles (Ref. 2) 

Based solely upon deduction from a disassembled listing of the new con- 
troller card PROM, it appears that the Language System (and so 3.3 too) uses 
6-bit nibbles instead of 5-bit nibbles. These nibbles are used as the inter- 
mediary stage in translating the bytes recorded on the disk surface into real 
memory bytes. 

Under DOS 3.2, data is written to the disk using only 8-bit bytes which 
meet the following criteria: 

Bit 7 is always set 

No two consecutive bits are 

Exactly 34 bytes meet these criteria. Their values fall between $AA and 
$FF. Two bytes, $D5 and $AA, are given special significance and are not 
used by 3.2 for storing data. They are used to signal the beginning of a 
sector's address or data segment. That leaves 32 distinct bytes, exactly the 
number needed to identify uniquely all possible 5-bit nibbles. They are map- 
ped by the controller card as follows: 



Byte/5-Bit Nibble 


Byte/5-Bit Nibble 


Byte/5-Bit Nibble 


Byte/5-Bit Nibble 


AB = 00000 


AD 


1 = 00001 


AE 


2 = 00010 


AF 


3 = 00011 


B5 4 = 00100 


B6 


5 = 00101 


B7 


6 = 00110 


BA 


7 = 00111 


BB 8 = 01000 


BD 


9 = 01001 


BE 


10 = 01010 


BF 


11=01011 


D6 12 = 01100 


D7 


13 = 01101 


DA 


14 = 01110 


DB 


15 = 01111 


DD 16=10000 


DE 


17 = 10001 


DF 


18 = 10010 


EA 


19 = 10011 


EB 20=10100 


ED 


21 = 10101 


EE 


22 = 10110 


EF 


23 = 10111 


F5 24=11000 


F6 


25 = 11001 


F7 


26=11010 


FA 


27 = 11011 


FB 28 = 11100 


FD 


29=11101 


FE 


30=11110 


FF 


31 = 11111 



(In addition to its use in data representation, $FF is the 'filler' which is 
written everywhere there isn't anything else.) 

However, DOS 3.3 codes data into bytes that meet these criteria: 

Bit 7 is always set... that's the same 

At least two adjacent bits must be set (i.e., have value 1) 

No more than two consecutive bits may be clear (have value 0) 

There must be no more than one pair of consecutive bits clear 

Many more bytes meet these requirements. In fact, 64 of them do, and 
that's precisely the number needed for a unique one to one mapping of the 
64 different 6-bit nibbles. 

Table stored at $BA29 - BA68 



Byte/6-Bit 


Nibble 


Byte/6-Bit 


Nibble 


Byte/6-Bit Nibble 


Byte/6-Bit Nibble 


96 


000000 


97 


000001 


9A 


000010 


9B 


000011 


9D 


000100 


9E 


000101 


9F 


000110 


A6 


000111 


A7 


001000 


AB 


001001 


AC 


001010 


AD 


001011 


AE 


001100 


AF 


001101 


B2 


001110 


B3 


001111 


B4 


010000 


B5 


010001 


B6 


010010 


B7 


010011 


B9 


010100 


BA 


010101 


BB 


010110 


BC 


010111 


BD 


011000 


BE 


011001 


BF 


011010 


CB 


011011 


CD 


011100 


CE 


011101 


CF 


011110 


D3 


011111 


D6 


100000 


D7 


100001 


D9 


100010 


DA 


100011 


DB 


100100 


DC 


100101 


DD 


100110 


DE 


100111 


DF 


101000 


E5 


101001 


E6 


101010 


E7 


101011 


E9 


101100 


EA 


101101 


EB 


101110 


EC 


101111 


ED 


110000 


EE 


110001 


EF 


110010 


F2 


110011 


F3 


110100 


F4 


110101 


F5 


110110 


F6 


110111 


F7 


111000 


F9 


111001 


FA 


111010 


FB 


111011 


FC 


111100 


FD 


111101 


FE 


111110 


FF 


111111 



It takes $199 5-bit nibbles to encode the data in $100 8-bit bytes. It only 
takes $156 6-bit nibbles to encode the same data. The saving in disk space in 
each sector, plus a slight reduction in the spacing between sectors, frees up 
enough room for three additional sectors. This is why DOS 3.2 has 13 sec- 
tors per track and DOS 3.3 has 16. 



30 



MICRO -The 6502/6809 Journal 



No. 50- July 1982 



- 



APPLE FEATURE 



9600 


9852 


9853 


9AA5 


9AA6 


9CFF 



9D00 
A884 



A908 



9D83 
A907 



A940 



Table 10: DOS Buffers and Their Contents 

STARTING ENDING 

ADDRESS ADDRESS DESCRIPTION 

USER FILE Buffer #3 

USER FILE Buffer 92 

USER FILE Buffer #1 

These 3 buffers contain the contents of the 

current data sector, current track/sector, 

list sector, and miscellaneous information 

about the file. 

Miscellaneous address vectors used within 

DOS. See Tables 1, 2, 3, and 4. 

DOS modified ASCII command table (bit seven 

always high on last character, bit seven of 

the other characters is clear.) e.g., 

52, 55, CE is RUN. 

DOS command parameter validity table. 

Checks validity of various parameters with 

various commands. Set=yes it does, 

zero=not allowed. 

First Byte: 

Bit 7 - BASIC uses this command if no 

file name (LOAD, RUN, SAVE) 
Bit 6 - Needs no parameters 
Bit 5 - Uses file name 
Bit 4 - Uses 2 file names 
Bit 3 - PM and INtf commands 
Bit 2 - Maxfiles only (2 & 3 allow a 
number as the only parameter) 
Bit 1 - Not valid in direct mode 

(OPEN, READ) 
Bit - Command writes to disk 
Second Byte: 

Bit 7 - Takes C, I, parameters 
Bit 6 - Takes V parameter 
Bit 5 - Takes D parameter 
Bit 4 - Takes S parameter 
Bit 3 - Takes L parameter 
Bit 2 - Takes R parameter 
Bit 1 - Takes B parameter 
Bit - Takes A parameter 
A941 A94A Parameter prefix names (V, D, S, L, R, B, A, 

C, I, 0) 
A94B A954 Parameter prefix byte 



AA75 


AA92 


AA93 


AAAF 


AABO 
AAC9 
AAE5 
AAF1 

B397 
B3A7 


AAC8 
AAE4 
AAFO 
AAFC 
B3A6 
B3AE 


B3AF 


B3BA 


B3BB 


B4BA 



B5BD 

B5D1 
B64D 



B6B3 
B6E8 
B7DF 
B7E8 

BA11 
BA29 
BA69 
BB00 



B5D0 
B5FE 
B65D 



B6CF 
B6FE 
B7E7 
B7FF 

BA28 
BA68 
BAFF 
BC55 

B7C7 



A94B 


$40 


for V parameter 


A94C 


$20 


D 


A94D 


$10 


S 


A94E 


$08 


L 


A94F 


$04 


R 


A950 


$02 


B 


A951 


$01 


A 


A952 


$co 


C 


A953 


$A0 


I 


A954 


$90 






Parameter prefix ranges (VDSLRBA in the 
normal order). The valid ranges for 
each parameter. First the lowest 

(minimum) value and then the highest 

(maximum) valid value. 
Modified ASCII error messages. (Bit 
seven of last character is set) . 

Example: 45, 4E, 44,20, 4F, 46, 20,44,41 ,54, C1 

= END OF DATA. 
Error message offsets, number of bytes 

beyond A971 that an error message 

starts. One offset per error message. 
Miscellaneous variables. See Table 5. 
File name Buffer lt\ , holds file name of 

file being used at present time. 
File name Buffer #2, holds file name while 

Applesoft is set up. 
See Table 5. 

1/0 package commands, see Table 6. 
Read command, see Table 7. 
Write command, see Table 8. 
Miscellaneous variables. 
"T,I,A,B,S,R,A,B n in modified ASCII (Bit 

7 high) for output or possibily input 

comparison purposes. 
"DISK VOLUME" In modified ASCII. (Bit 7 

high for each character) for output or 

input comparison. 
VT0C (Volume Table of Contents). See DOS 

Manual P. 132. This is loaded whenever a 

disk access is made. 
System buffer - last accessed sector from 

disk before moving to normal program 

memory location or out to screen if 

catalog. 
File manager parameters. 
File manager scratchpad. 
Data for use in Boot in code, possibly 

timer decrementing or indexing numbers 

list of decreasing odd then even hex 

words. 
Not used. 
Not used. 
Scratchpad. 
I0B buffer, includes device characteristics 

table (DCT) at B7FB for RWTS. 
Miscellaneous data. 
Encoded nibbles, Table 9. 
Decoding or encoding buffer. 
I/O encoded nibble buffer; it takes $156 

6-bit nibbles to encode $100 of data. 
Miscellaneous data. 



Table 11: DOS Code Functions 
Divided Into Blocks By Functions 



9600 
9853 
9AA6 



9D00 

9D10 



9D1E 
9D56 



9D62 
9D6C 
9D78 

9D84 
9DBF 



9DD1 
9DEA 



9E51 
9E81 



9EBD 



9EEB 



9F12 
9F23 

9F2F 



TO DESCRIPTION 

9852 USER FILE Buffer #3 

9AA5 USER FILE Buffer #2 

9CFF USER FILE Buffer #1 

Contains content of the current data sector, 
carries track/sector, list sector and 
miscellaneous information about file. 

9D0F Miscellaneous addresses used within DOS 
address constants (see Table 1). 

9D1D Addresses used in state machine that routes 
output characters (used from 9EC0 to 
9ED0, $AA52 is used to choose which one) 
(DOS to 6). See Table 2. 

9D55 DOS command branch vectors used from 

A186 to A192 with AA5F used to choose 
which one to call. See Table 3- 

9D61 Vectors used by DOS to interface with the 
various support languages (see Table 4). 
(Current language - Applesoft or Integer 
BASIC). 

9D6B Integer BASIC (moved in when needed). 

9D77 Applesoft ROM (moved in when needed). 

9D83 Applesoft RAM (disk version) (moved in 
when needed) . 

9DBE Which BASIC? Hard entry point. 

9DD0 DOS soft entry - $3D0 jumps here, as does 
reset with an autostart ROM. (Routine 
to re-initialize DOS). 

9DE9 Both hard and soft entries join. 

9E1F Initialize DOS buffers and set vectors for 
RAM Applesoft called from DOS KEYIN 
routine on a hard entry or FP command. 
(But only when there is no Applesoft ROM 
card and Applesoft must come off the 
disk.) 

9E50 $AA5F is if this is the first character 
input since the Boot. That is because 
$AA5F holds the command number and 
is for INIT. The DOS image still has 
left from when it was created. This 
signals to RUN the HELLO program and other 
beginning things. 

9E80 TABLE OF COMMANDS, etc. that is. copied into 
$3D0 to 3FF on boot up (such as JMP and 
entry point.) 

9EBC INPUT CHARACTER ROUTINE - DOS comes here 
every time a program uses JSR $FD1B 
or $FD0C to input a character. That 
includes every BASIC input statement 
or every line typed to the BASIC prompt 
(] or >) (Handles input hook). 

9EEA This routine pushes an address from the 
state machine table onto the stack and 
then RTS's to jump to that address plus 

1. If DOS is active the output hook points 
to this address. A hook is a pointer in 
one address that points to another address 
i.e., every character output causes this 
routine to be called with that character 

in the ACC. 
9F11 DOS #0 ENTRY (<$AA52> =0) 

1. Default value on DOS entry (set at 
$9DDA). Also used at front of line 
ouputted from a program. 

2. Checks for some special cases as 
follows : 

a. If Applesoft begin run switch is set 
then clear it and rejoin "RUN" command. 

b. If 2nd character printed after 
inputting from 'READ' FILE is •?• then 
just echo (Assuming MON I). 

c. If 2nd character printed after input 
from 'EXEC* file is the prompt, then 
just echo (ANY MON). 

d. If charater is CTRL-D, collect line 
by using STATE2 next. INPUT SWITCH 
($AA51) is clear if input is coming from 
the keyboard; it is set if input comes 
from a 'READ' or 'EXEC file. It is also 
set on boot entry. If input is from a 
file we test the character being 
outputted. 

9F22 DOS #1 ENTRY (<$AA52> = 1) 

Outputting CTRL-D line from program, so 
we collect the line for decoding. 

9F2E DOS #2 ENTRY (<$AA52> = 2) 

Outputting normal line from program, 
so just print to output device, usually 
the screen . 

9F51 DOS #3 ENTRY (<$AA52> = 3) 

Come here to output a character being 
echoed from the input routine (keyboard 
or' EXEC file) so we do one of 3 things: 
7. 0) output unconditionally via $9FA4 

2. M) maybe output (if MONC bit set) 
via $9F9D 

3. D) decode KEYIN buffer as command 
via $9F15. 

(Continued) 
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Table 11 (continued) 



This depends on: 

T. what character is being outputted 

2. if BASIC is running (active) 



9F3F 

9F49 
94FC 

9F52 

9F61 
#4. 9F71 



9F83 
9F8B 



9F95 



E 
X 
£ 
C 

9F48 

9F4B 

9F51 

9F60 
9F70 



3. if an 'EXEC 

CHARACTER IS 

<Cft> 
BASIC ACTIVE 
NO YES 

NO D 

YES D D 



file is active. 



NOT <CR> 

BASIC ACTIVE 
NO YES 




E NO 

X 

E YES 

C 



M 



9FC7 



9F8A 
9F94 



9F9E 



9F9F 


9FA3 


9FA4 


9FB2 


9FB3 


9FC4 


9FC5 


9FC7 



9FC8 



A193 

A1A4 
A1AE 
A1B9 



A1D6 
A203 
A229 
A22E 
A233 
A23D 
A251 
A263 
A271 

A281 
A298 
A2A3 
A2A8 
A2EA 
A331 
A35D 
A38E 
A397 
A3D5 



A1AD 
A1B8 

A1D5 



A202 
A228 
A22D 
A232 
A23C 
A250 
A262 
A270 
A280 

A297 
A2A2 
A2A7 
A2E9 
A330 
A35C 
A38D 
A396 
A3D4 
A3DF 



Only used when program echoes a <CR> after 

getting a character from keyboard or 'EXEC 

file'. 
Here the carry represents: "Is BASIC 

running but there is no active EXEC file?" 

CC=YES C5=N0 
Put <CR> in buffer at position following 

string inputted and then try to decode it 

as a command. Also comes here for 

keyboard entry to ], > or * prompt or any 
DOS #4 ENTRY (<$AA52> = 4) 

'Write' is active, middle of line. States 

4 and 5 work together to output to the 

disk until a line comes along with a 

CTRL-D on the front. 
DOS #5 ENTRY (<$AA52> s 5) 

'Write' is active, front of line. Then go to 
DOS tf6 ENTRY (<$AA52> =6) 

Echoing character input from 'READ' file. 

Ignore character for DOS command purposes. 

Come here on first character outputted 

after running Applesoft BASIC program from 

disk. 
Return from DOS command execution. 
If not CTRL-D, clear out the buffer and 

pretend the user didn't type anything 

but a <CR>. This is designed to work 

well with routine line 'GETLN' in the 

Apple II ROM ($FD6A). 
Set up the accumulator with the correct 

bit to test the 'MON' output MODE: 

$40 for command echo 

$10 for DISK output echo 

$20 for DISK input echo 
Test the bit and output if it is set in the 

MON byte at $AA5E. 
Call the real output routine but keep 

control of the registers. 
Finally leave DOS to idle routine at $9E81. 

Restore stack, A,Y,X. Save I/O hooks. 
This is called to output the character in 

the accumulator to the output device 



(usually the screen). 

Reads keyboard, checks for command validity. 
If not valid start processing error via 
routine at $A0C9 to A6D2. Decodes ASCII 
from keyboard, converts to command code #, 
then if the command is valid, jumps to 
$A180 where command code number indexes 
table to appropriate address to execute 
command. 

Command code number points to proper place 
in table $9D1F which has appropriate 
vectors for command, pushes command address 
on stack. Then jumps to that address 
by executing an RTS. 

Look at keyboard buffer, compare to 
<RETURN> 

Compare keyboard character to $A0 (blank). 

Put 0»s into $B5BA-$B5C9. 

Miscellaneous subroutine. 



Decimal conversion. 

Hexadecimal conversion. 

"PR#" 

»IN#" 

"MON" 

"NO MON" 

"MAX FILES" - 3 on boot up - up to 16 files. 

"DELETE". 

LOCK/UNLOCK - software write protect 

and VERIFY. 
"RENAME" 
"APPEND" 
"OPEN" 

Command handler. 
"CLOSE" 
"BSAVE" 
"BLOAD" 
"BR UN" 
"SAVE" 

BLOAD, BSAVE, BRUN, routine affecting only 
binary file operations. 



Table 11 (continued) 



A3E0 



(Continued) 



A413 


A479 


A47A 


A4AA 


A4AB 


A4D0 


A4D1 


A4EF 


A4F0 


A50F 


A510 


A54G 


A54F 


A56D 


A56E 


A579 


A57A 


A590 


A59E 


A5B1 


A5B2 


A5C5 


A5C6 


A5DC 


A5DD 


A60D 


A60E 


A671 


A672 


A69C 


A69D 


A6A7 


A6A8 


A6C3 


A6C4 


A719 


A71A 


A742 


A743 


A74D 


A74E 


A75A 


A75B 


A763 


A764 


A791 


A792 


A7A9 


A7AA 


A7AE 


A7AF 


A7C3 


A7C4 


A7D3 


A7D4 


A845 


A846 


A850 


A851 


A883 


A884 


A908 



A94B 
A955 



A971 
AA3F 
AA4F 

AAB8 

AAC1 



AAE5 



A954 
A970 



AA3E 
AA4E 
AAB7 

AACO 
AAC8 



AAFD 


B396 


AAFD 


AB1E 


AB1F 


AC05 


AC06 


AC39 


AC3A 


AC57 


AC58 


AC69 


AC6A 


AC86 


AC87 


ACB7 


ACB8 


ACEE 


ACEF 


AD11 


AD12 


AD17 


AD18 


AD2A 


AD2B 


AD97 


AD98 


AE41 



AF06 
B397 



AE39 



B396 
B6FF 



Subroutines which work with BRUN, BLOAD 

and BSAVE. 
"LOAD" 

"LOAD" assisting subroutine. 
Miscellaneous subroutine. 
"RUN" 
"CHAIN" 

"READ/WRITE" entry points. 
"INIT" 
"CATALOG" 
Language decode. 
"INT" 

Set ROMs for Applesoft or integer BASIC. 
"EXEC" 
"POSITION" 

Output to disk file routine. 
Get character from EXEC file. 
Make EXEC file currently open from $9615. 
VERIFY. 

Error processing, print errors. 
Called from $A2DE. Append transfer data to 

$B5BF to $B5C4. 
READ $AA75 - output string called by 

$A208 Append. 
Modify $B5A9 - $B5AF. 

Turn in and out switches OFF from $9E1D. 
Check output string starting at $AA75> 
Part of clone routine from $A316, $A31B. 
Part of clone from $A325, $A773. 
Part of clone routine from $A2FC, $A320. 
Check file type. 
Initialize buffer from $9E0C. 
Integer BASIC pointer setting. 
Set I/O hooks. Branch from 3EA. 
Command name table. 

NOTE: The last byte of each command 

name has the high (7th) bit set. The 

other bytes have it clear. 

(ex. 49 4E A3 = IN#). The search used is 

sequential ASCII codes (see Table 10). 

NOTE: this is where you can customize commands 
Parameter validity table. Checks validity 

of various parameters with various 

commands with 2 bytes (see Table 10). 
Parameter prefix names (VDSLRBACIO) . 

(See Table 10). 
Parameter prefix bits (see Table 10). 
Parameter prefix ranges (see Table 10). 

For the Various prefix parameters 

(VDSLRBA is the normal order). This gives 

the range of possible values. First the 

lowest (minimum) value that i3 valid then 

the highest (maximum) valid value. 
ASCII error message table. 
Error message offsets. 
Miscellaneous variables (ADDR) 

AA5F = COMMAMD? 
Name of FP basic file, "APPLESOFT". 
4 miscellaneous addresses 

(RWTS IOB buffer) 

(VTOC buffer) 

(SYS buffer) 

(Top of RAM) 
I/O package coamands (see Table 6). This table 

is used at $AB14 to $AB1E to Jump to the 

correct 1/0 routine. $B5BB is used to 

choose which I/O routine will be called. 
READ commands (see Table 7), This table is 

used at $AC58 to $AC69 to jump to correct 

READ routine. The value of $B5BC is used 

to get the correct entry and a Jump is 

made there. 
WRITE commands (see Table 8). This table is 

used at $AC70 to AC86 to Jump to the 

correct WRITE routine. The value of 

$B5BC is used to specify which routine 

will be jumped to 
1/0 package. Entry point for I/O package. 
Chooses which I/O routine by using $B5BB to 

store I/O routine # to index through table 

at $AAC9. 
OPEN file. 
CLOSE file. 
RENAME file. 
READ from file - directs DOS to correct READ 

routine. 
WRITE to file - directs DOS to input WRITE 

routine. 
READ specific/next byte/block entry points. 
WRITE specific/next byte/block entry points. 
LOCK/UNLOCK a file. 
POSITION file ($B300). 
VERIFY file. 
DELETE file. 
Print CATALOG. Takes file information from 

disk - sends in the buffer, then out to 

the screen. 
Responsible for pause during catalog 

listing. 
Various subroutines called by DOS commands. 
Data area. 

(Continued) 
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Table 11 (continued) 



B398 



B3A7 


B3AE 


B3AF 


B3BA 


B3BB 


BMBA 



B5BA 



B5BB 



B5BC 
B5BD 
B600 


B5FE 
B6B1 


B700 


B78C 


B793 


B7B^ 


B7BF 
B7C2 
B7D6 

B7DF 
B7E8 
B800 


B7C1 
B7D5 
B7DF 
B7E7 
B7FF 
B829 



B8B7 



B8B8 
B8C2 


B8C1 
B8D8 


B8DC 
B941 

B9A0 
B9FD 


B943 
B99F 
B9FC 
BA10 


BA11 
BA29 
BBOO 


BA28 
BA68 
BC55 


BC56 


BCC3 


BCC4 
BCDB 
BCDF 
BDOO 


BCDE 
BCDE 
BCFF 
BD18 



BD19 



BD34 


BD63 


BD6U 


BD84 


BD85 


BD8F 


BD90 


BD96 


BD97 


BD9D 


BD9E 


BDAA 


BDAB 


BDBO 



BDB5 


BDBB 


BDBC 


BDCO 


BDC1 
BDC7 


BDC6 
BDC8 


BDC9 

BDCC 


BDCB 
BDCD 


BDCE 


BDD1 


BDD2 


BDD6 


BDD7 


BDEO 



Track and sector address for the most 

recently read catalog sector. 
T, I, A, B file type characters. 
Character string "DISK VOLUME". 
VTOC buffer, master track/sector bit map 

sector or volume table of contents 

(VTOC). 
System buffer - last accessed director 

sector. This last access may have been 

a catalog command or other DOS command 

requiring a directory search. 
1st byte beyond the system buffer. The 

routine in page 3 at $03DC loads Y and 

A registers to point here. 
Used to choose which I/O routine. 
Miscellaneous data. 
Relocation "boot up". Checks size of 

machine. 
'General codes entry point for R.W.T.S. 

bootstrap routine. 
Miscellaneous subroutine. 

Miscellaneous subroutine. 

Miscellaneous subroutine. 

Miscellaneous subroutine. 

Miscellaneous data. 

I/O block.' 

New subroutine, prenibblize to write 

($B800 3.2). 
New subroutine. "Write nibbles" (encode 

data) . 
Reference addresses which actually 

control the disk interface device select 

address. 
Routine at set mode. 
Routine "post nibble" ($39C1 3.2) decode 

into real world data. 
Routine "read nibbles" data ($B8FD 3-2). 
Routine "read next address field". 
Routine to step R/W head up or down. 
Delay routine based on the last 2 bytes 

of DCT. 
Data or buffer. 
Encoded nibbles (64). 
Buffer. Encoded nibbles to/from disk 

buffer. 
Motor running and on track. Format this 

track for INIT or writing to disk. 
WRITE byte. 
WRITE nibble. 
Miscellaneous data. 
STEP 1 - Determine new slot #. 
STEP 2 - ($BD17) If not same go to $BD19. 
If same, go to STEP 4 ($BD3H). 
STEP 3 - Not same slot, wait for motor to 
turn off. 



STEP 4 - Check if motor is currently on, 
save results, STEP 5 ($BD4D). Turn motor on 

regardless of previous state. 
STEP 6 - Determine if previous drive = 

current drive. If yes, go to STEP 8 

$BD92. 
STEP 7 - If not same drive, WAIT for new 

drive to come up to speed, and set test 

result from STEP 4 to false ($BA00 relay 

delay loop x 7). 
STEP 8 - Jump to track seek routine 

($BE5A). 
STEP 9 - Was motor on in STEP 4? 

YES, go to STEP 11 ($BDAB). 

NO, go to STEP 10. 
STEP 10 - wait for motor to come up to 

speed. 
STEP 11 - if get "NULL" command, go to STEP 

26 = ($BE0B) - (if no error turn off 

motor, if error occurred, indicate 

appropriate one). If not go to STEP 12 

= ($BDB1). 
STEP 12 - if given "FORMAT DISKETTE" command 

go to STEP 28 (- $BEAF). If not, 

go to STEP 13 ($BDB5). 
STEP 13 - Given "WRITE SECTOR" command? 

If yes, prenibblize the data. 
STEP 14 - Allow 48 retries for writing or 

reading process (RETRYCOUNT = 48). 
STEP 15 = Read next field address. 
STEP 16 - Was error encountered? 

NO = STEP 22 ($BDED), YES = CONTINUE 

to STEP 17. 
STEP 17 - Decrement "RETRYCOUNT" (0578). 
STEP 18 - $BDCC. Is RETRYCOUNT = 0. 

If no, go to STEP 15 - ($BDC1). 

(Read next address field, try again). If 

yes, jump to STEP 19- 
STEP 19 - Find current track, save wanted 

track, 
JSR SETTRK ($BE95). Recalibrate all over 

again. 
Is $06F8 = 0? (Initially 02) YES go to 

STEP 27 ($BE04). Indicate error. 

No - Set SEEKCNT = 04 (0478). 



Table 11 (continued) 



BDE1 BDE9 STEP 20 - Recalibrate out to track 00. Then 

to desired track. 
BDEA BDEC STEP 21 - Go back to 14 (try again). 
BDED BDF3 STEP 22 - Check if on right track. 

Yes - STEP 23 = $BE10 
BDF4 BE03 No, not correct TRK, get desired track, JSR 

SETTRK, decrement SEEKCNT (from 040. If 

it has been less than 4 tries, go to TRKSEEK 

ROUTINE ($BE5A), then to STEP 14. If 4th 

time - RECAL. Then STEP 14. 
BE04 BE0F STEP 27 - (06F8 - 0). DRIVE ERROR, JMP to 

$BE48. Indicate error, turn off motor. 
BE10 BE25 STEP 23 - CORRECT VOLUME? 

No - STEP 27 ($BEQ7), indicate error, turn 
off motor. Yes - go to STEP 24. 
BE26 BE31 STEP 24 - Correct sector? 

No - STEP 17 ($BDC9) 

Yes - Go to STEP 25 and READ or WRITE. 
BE32 BE37 STEP 25 - Do read or write operations. 
BE38 BE50 Check for BAD READ, if bad - STEP 17 

($BDC9). STEP 26 - If ok. GIVE NO ERROR 

MESSAGE. Turn off motor. EXIT at $BE58. 
BE51 BE59 WRITE subroutine, 
BE5A BE6A TRACK SEEKING ROUTINE. 
BE6B BE80 Doesn't switch off all stepper motor lines, 

jump to $B9A0 to STEP R/W. 

Head up or down (update slot dependent 

locations with track. 
BE8E BE9^ SET Y = SLOT #. 



BE95 


BEAE 


"SETTRK" (Sets track location) 
(Slot dependent) . 


BEAF 


BFOC 


STEP 28 - FORMAT DISK routine. 


BF0D 


BFA7 


RWTS miscellaneous read or write 

routine. 


BFA8 


BFB7 


Blank. 


BFB8 


BFC7 


Miscellaneous data. 


BFC8 


BFFF 


Miscellaneous subroutines not connected 
with RWTS. 



JNCftO 



NEW 6809 SYSTEM! 



Now, for about the same price as you would expect to pay for the 
memory capacity alone, you can have a complete single board 
computer with these features: 

-X-6809 CPU, 1 MHz clock 

-X-192KB RAM included, sockets for 64KB more 

-A-84X24 display of a 7X1 2 character font 

->C-Keyboard interface for an un-encoded switch matrix 

-"-Floppy controller for two 5" drives, single or double sided, up to 

80 tracks 
-"-Parallel printer port 
-"-Serial I/O port 

-X-General purpose 8-bit parallel I/O port 
-^-Parallel expansion port 
^-Dimensions: 8.6 by 10.3 inches 

The FLEX operating system is supported by our device drivers. 
BASIC, PASCAL, and C are available for FLEX. The device drivers (in 
EPROM] include advanced features like auto-repeat for the 
keyboard, and track buffering for the disks. Commented source code 
of all EPROM contents is supplied. 

For more information, send a stamped self-addressed envelope and 
we will send you a configuration guide that explains how to set-up a 
system. An assembled board is purchased by sending check or 
money order for $735 per board. (California add 6°/o sales tax}. 

Chandler Microsystems 

22051 COSALA 

MISSION VIEJO, CA 92691 

FLEX, trademark Technical Systems Consultants, Inc. 
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IMAGE PRINTER SERIES 

Sensible Software is proud to introduce our new series of high 
resolution screen dumps. IMAGE PRINTERS provide a simple way 
to transfer high resolution graphic images onto paper. Each pro- 
gram in the series has unique features that give you full control of 
the printing. Some of the included options are: 

• Full control over the area of the HIRES screen to be printed. You 
graphically pick the area for the utmost ease and accuracy. 

• One-step printout of the picture with the ability to pause or abort 
the printing at any time. 

Menu-driven. All options are invoked with single keystrokes. 
IMAGE PRINTERS are extremely easy to use. 
Multiple image sizes, 6 different sizes for letter quality printers, 
4 sizes for other printers. 
• Creation of an inverse (negative) image for reverse printing. 

The ability to save the compressed and inverse images to 
disk. 

• One time configuring for your printer and interface card. 
Why answer all those questions about your printer each 
time you want to print a picture? 
• The images may be printed anywhere on the page. 
IMAGE PRINTERS support most popular interface 
cards, such as cards from Apple, California Compu- 
ter Systems, Epson, and Mountain Computer. (The 
SSM AIO Serial Card and user-written 'driver' 
routines may be used with the letter quality 
printers.) 

There are three separate versions of IMAGE 
PRINTERS, each one tailored to take full ad- 
vantage of a different printer. 




IMAGE PRINTER— LETTER QUALITY. For 
all popular letter quality printers (Diablo, 
NEC, Qume, etc.) 

IMAGE PRINTER— EPSON. For the 
popular Epson MX-70, MX-80 and 
MX-100. 

IMAGE PRINTER— NEC PO-8023A. 
For the NEC dot-matrix printer. 

All versions ore available 
fot $40.00 eo. 

Please specify version desired. 



Sensible Software 

6619 Perham Drive Dept. M 

West Bloomfield, Michigan 

48033- (313)399-8877 

Visa and Mastercard 

Welcome 

Please add $1 25 

postage and 

handling per 

diskette 




APPLE FEATURE 



Converting Apple Pictures to a 
Standard Bit-Mapped Format 



by David Lubar 



This program will allow 
conversion of Apple II format 
high-resolution pictures to a 
standard bit-mapped format. It 
may be run on the source or 
destination machine. 

Requires 

Apple II or Apple II Plus 
24K or greater without DOS 
36K or greater with DOS 

My first experience with data transfer 
between computers was in the form of 
digital entry (the digits being my typing 
fingers). This method suffered both a 
low baud rate and a high error rate. 
Later, the appearance in MICRO of a 
program to write KIM tapes on the Ap- 
ple improved matters. The latest step is 
in the form of several programs that 
allow the PET, MTU-130, and other 
6502 machines to read and write Apple 
binary format. This format has become 
a sort of standard among the people 
with whom I swap data. Frank Covitz, 
who wrote the tape routines we use 
(see "PET Communicates with Apple" 
in this issue] / actually transfers data 
from an MTU-130 to his PET using 
Apple format. 

Once we were able to transfer data, 
the big question became what to trans- 
fer. At first, our choice was limited 
mostly to music data for the music in- 
terpreter Frank wrote. The music code is 
machine independent, and can go from 
one '6502 computer to another with no 
problem. Since Frank had the MTU 
Visible Memory in his PET, and high- 
resolution capability on the MTU-130, 
I decided to see if pictures done on the 
Apple hi-res screen could be translated 
into a standard bit-mapped format. As 
generated, an Apple picture won' t fit a 
standard bit map in three different 
ways. First, the screen lines aren't 
stored in memory in contiguous order. 



The top line starts at 2000, the second 
at 2400, the third at 2800. After 
reaching 3C00, it goes to 2080. The 
second problem is that only seven of 
the eight bits map to the screen. The 
high bit is a color switch. Topping it 
off, on the Apple a byte is plotted on 
the screen with the low bit in the left- 
most position. Most bit maps plot each 
byte with the high bit to the left. 

Of the three problems, two can be 
solved with lookup tables or calcula- 
tions. The toughest part seemed to be 
packing eight Apple bytes, each with 
seven bits of information, into seven 
bytes with eight bits of information. 
After playing with the problem for a 
while, I found there was a simple algo- 
rithm for the required manipulation. 

Let's look at the three translations, 
starting with the simplest. 

Unmapping the Screen 

There are two ways to access ver- 
tical locations on the Apple screen 
methodically. A base calculation can be 
done which will turn any Y coordinate 
into the correct address. This is the 
method used in the internal routines in 
Applesoft. A faster method is to use a 
table containing the low and high byte 
for the start of each screen line. Since 
the table is not that long, and contains 
a fair amount of repetition (making en- 
try easy), I went with the table. Nor- 
mally, the high byte entries point right 
to the hi-res screen. In the interest of 
machine independence, I subtracted 
the page number from the standard 
high byte table. This allows the user to 
put the source data at any page boun- 
dary. The page number is added to each 
high byte pulled from the table. To use 
the table, just put the desired screen 
line value in X and pull the entries out 
of the table, putting them into a pair of 
zero-page pointers. That takes care of 
unraveling the screen. 



Mirror Image 

Reversing a byte is not difficult. 
You just put the byte in the accumula- 
tor, then rotate the accumulator one 
way and rotate a byte of memory the 
other way. Do this eight times and the 
memory location will contain the 
reversed byte. The only thing to keep in 
mind is that the color switch that was 
originally the high bit has been flipped 
to the low position. (Note: if you have 
an application that requires quick 
reversal of bytes, this method might 
prove too slow. In such cases, use a 
lookup table containing reversed bytes 
stored in order of their original value. 
That way, the desired value can be used 
as an index into the table.) 

Packing Them Down 

This is the really interesting part. 
How do you shift everything over and 
drop the switch bit? The first thing I 
realized was that it would make sense 
to work with eight Apple bytes at a 
time. They would fit neatly into seven 
normal bytes. Some form of rotation 
would be required to achieve this. The 
end result would be the same as if you 
took one bit from the second byte and 
moved it to the first, then shifted the 
second byte over, took two bits from 
the third byte, and so on. Here's the 
method I used. First, assume there are 
eight bytes that haven't been reversed 
yet. Take the eight and perform a ROL. 
This knocks off the high bit. Now ROL 
bytes eight and seven. This moves a bit 
from the eighth byte to the seventh and 
removes the high bit from the seventh. 
Repeat the procedure with bytes eight, 
seven, and six, and so on until it has 
been done eight times. The result is 
that byte eight contains none of the 
original information, while bytes seven 
through one contain eight plotting pixels. 

There is only one slight complica- 
tion. The reversal has to be performed 
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Table 1 








0900- 


00 


04 


08 


OC 


10 


14 


18 


1C 


0909- 


00 


04 


08 


OC 


10 


14 


18 


1C 


0910- 


01 


05 


09 


OD 


11 


15 


19 


ID 


0918- 


01 


05 


09 


OD 


11 


15 


19 


ID 


0920- 


02 


06 


OA 


OE 


12 


16 


1A 


IE | 


0928- 


02 


06 


OA 


OE 


12 


16 


1A 


IE 


0930- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


0938- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


0940- 


00 


04 


08 


OC 


10 


14 


18 


ic ; 


0948- 


00 


04 


08 


OC 


10 


14 


18 


1C 


0950- 


01 


05 


09 


OD 


11 


15 


19 


ID 


0958- 


01 


05 


09 


OD 


11 


15 


19 


ID 


0960- 


02 


06 


OA 


OE 


12 


16 


1A 


IE 


0968- 


02 


06 


OA 


OE 


12 


16 


lA 


IE 


0970- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


0978- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


0980- 


00 


04 


08 


OC 


10 


14 


18 


IC 


0988- 


00 


04 


08 


OC 


10 


14 


18 


IC 


0990- 


01 


05 


09 


OD 


11 


15 


19 


ID 


0998- 


01 


05 


09 


OD 


11 


15 


19 


ID 


09A0- 


02 


06 


OA 


OE 


12 


16 


1A 


IE 1 


09A8- 


02 


06 


OA 


OE 


12 


16 


1A 


IE 


09B0- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


09B8- 


03 


07 


OB 


OF 


13 


17 


IB 


IF 


09C0- 


00 


00 


00 


00 


00 


00 


00 


00 


09C8- 


80 


80 


80 


80 


80 


80 


80 


80 


09D0- 


00 


00 


00 


00 


00 


00 


00 


00 


09D8- 


80 


80 


80 


80 


80 


80 


80 


80 


09E0- 


00 


00 


00 


00 


00 


00 


00 


00 


09E8- 


80 


80 


80 


80 


80 


80 


80 


80 


09F0- 


00 


00 


00 


00 


00 


00 


00 


00 


09F8- 


80 


80 


80 


80 


80 


80 


80 


80 


0A00- 


28 


28 


28 


28 


28 


28 


28 


28 


0A08- 


A8 


A8 


A8 


A8 


A8 


A8 


A8 


A8 


0A10- 


28 


28 


28 


28 


28 


28 


28 


28 


0A18- 


A8 


h& 


A8 


A8 


A8 


A8 


A8 


A8 


0A20- 


28 


28 


28 


28 


28 


28 


28 


28 


0A28- 


A8 


A8 


A8 


A8 


A8 


A8 


A8 


A8 


0A30- 


28 


28 


28 


28 


28 


28 


28 


28 


0A38- 


A8 


A.8 


A8 


A8 


A8 


A8 


A8 


A8 


0A40- 


50 


50 


50 


50 


50 


50 


50 


50 


0A48- 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


0A50- 


50 


50 


50 


50 


50 


50 


50 


50 


0A58- 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


0A60- 


50 


50 


50 


50 


50 


50 


50 


50 


0A68- 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


0A70- 


50 


50 


50 


50 


50 


50 


50 


50 


0A78- 


DO 


DO 


DO 


DO 


DO 


DO 


DO 


DO 



before packing the bits; otherwise the 
screen becomes rather garbled. Since 
the algorithm was designed to strip the 
high bit, and since some machines 
might also plot bits from low to high, I 
decided to maintain transportability by 
adding a step to the reversal procedure. 
After each byte is reversed, it undergoes 
one LSR. This kicks off the low bit 
(which was formerly the high bit color 
switch] and puts a dummy unused bit 
back at the high end. In this way, using 
the reversal portion as a separate 
module that can be left in or removed, 
depending on the mapping of the desti- 
nation computer, the packing algo- 
rithm will always work. 

Once the bytes have survived the 
above transformations, only one more 
step is necessary. The packing has left a 
gap every eight bytes. The picture data 
has to be shifted down. Once this is 
done, the information is in pure bit- 
mapped order. The following program is 



designed to put an Apple picture on a PET 
with the MTU Visible Memory. It can 
easily be adapted for other computers. 

Apple to PET 

The top routine, ZSAVE, merely 
saves the zero-page locations used by 
the program. Since 6502 machines vary 
in free locations, this approach can save 
a bit of grief. Next, the pointers for 
source and destination are set up. Note 
the LDA #$20 on the line labeled 
SETUP. This is the page number where 
the source data is stored. If you put the 
source at another location, just change 
the 20 to the correct page number. 

Starting at the label MAIN, the pro- 
gram gets the location of a picture line 
from the table. The X register is used to 
keep track of the line being processed. 
Next, to simplify matters, the line is 
moved to a standard buffer. Since the 
buffer address is fixed, operations such 



as rotations and shifts are much less of 
a headache. The buffer is only 40 bytes 
long (this is the number of bytes on one 
line of Apple hi-res), so it can be put 
almost anywhere in memory. 

With a line in the buffer, the next 
step is the SWAP section. Tnis just 
reverses each byte and performs a shift 
to move the data back to the seven 
lower bits. If your display maps from 
low to high, delete this section. 

The packing is performed next. 
Since the operation has to be performed 
on the eighth byte, then the eighth and 
seventh, and so on, a counter and 
pointer are required. The counter keeps 
track of the number of bytes being 
manipulated, the pointer shows which 
byte to rotate. When the counter has 
cycled from one through eight, the 
eight bytes have been packed. Since 
each line contains forty bytes, the 
operation has to be done five times. 



Listing 1 














0800 








1 


♦APPLE 


TO PET VM GRAPHIC CONVERTER 


0800 








2 


♦USES LOOKUP 


TABLE FOR APPLE DATA 


0800 








3 


•LOCATION $04 MUST HOLD PAGE 




0800 








4 


♦WHERE 


&PPLE 


SCREEN IMAGE STARTS 


0800 








5 


* 








0800 








6 




ORG 


$800 




0800 








7 


* 








0000 








8 


DEST 


EPZ 


$00 


POINTER TO PET'VM DISPLAY 


0002 








9 


SRC 


EPZ 


$02 


POINTER TO SOURCE, REQUIRES 8 


K OF 


FREE 












0004 








10 


PAGE 


EPZ 


$04 


OFFSET FOR PAGE WHERE APPLE D 


ATA IS STORED 












0005 








11 


XSAVE 


EPZ 


$05 




0006 








12 


COUNTER 


EPZ 


$06 




0007 








13 


POINTER 


EPZ 


$07 




OBOO 








14 


BUFFER 


EQU 


$B00 


STICK IT AFTER TABLE 


0900 








15 


THI 


EQU 


$900 


HI BYTE LOOKUP TABLE 


09C0 








16 


TLO 


EQU 


$9C0 


LO BYTE TABLE 


9000 








17 


VM 


EQU 


$9000 


START OF VM MEMORY MAP 


0800 








18 


* 








0800 








19 


♦SAVE ZERO PAGE VALUES 




0800 








20 


* 








0800 


78 






21 


ZSAVE 


SEI 






0801 


A2 


08 




22 




LDX 


#$08 




0803 


B5 


00 




23 


ZLOOP 


LDA 


$0,X 




0805 


48 






24 




PHA 






0806 


CA 






25 




DEX 






0807 


10 


FA 




26 




BPL 


ZLOOP 




0809 


A9 


20 




27 


SETUP 


LDA 


#$20 


PAGE WHERE APPLE IMAGE IS STO 


RED. 


CAN BE CHANGED 










080B 


85 


04 




28 




STA 


PAGE 




080D 


A9 


00 




29 




LDA 


#VM 




080P 


85 


00 




30 




STA 


DEST 


PET SCREEN 


0811 


A9 


90 




31 




LDA 


/VM 




0813 


85 


01 




32 




STA 


DEST+1 




0815 

S 

0817 


A2 


00 




33 




LDX 


#$0 


X COUNTS VERTICAL SCREEN LINE 


BD 


CO 


09 


34 


MAIN 


LDA 


TLO,X 


POINT TO APPLE 


081A 


85 


02 




35 




STA 


SRC 


IMAGE USING LOOKUP TABLE 


081C 


BD 


00 


09 


36 




LDA 


THI,X 


OFFSET BY PAGE WHERE 


081F 


18 






37 




CLC 




DATA IS STORED 


0820 


65 


04 




38 




ADC 


PAGE 




0822 


85 


03 




39 




STA 


SRC+1 




0824 


86 


05 




40 




STX 


XSAVE 




0826 








41 


* 








0826 








42 


♦FIRST. 


ONE SCREEN LINE IS MO\ 


fED 


0826 








43 


♦INTO A 


BUFFER AREA 




0826 








44 


* 








0826 


AO 


27 




45 




LDY 


#$27 ; 


40 BYTES PER LINE 


0828 


Bl 


02 




46 


FILLBUFF LDA 


(SRC),Y 




082A 


99 


00 


OB 


47 




STA 


BUFFER, Y 




082D 


88 






48 




DEY 




BUFFER 


082E 


10 


F8 




49 




BPL 


FILLBUFF 




0830 








50 


* 








0830 








51 


♦EACH BYTE HAS TO BE REVERSED 




0830 








52 


* 








0830 


A2 


27 




53 




LDX 


#$27 


40 BYTES AGAIN 


0832 

NS 

0834 


AO 


08 




54 


SWAP 


LDY 


#$08 


HAVE TO DO 8 PAIRS OF ROTATIO 


BD 


00 


OB 


55 




LDA 


BUFFER. X 
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0837 2A 




56 


SWLOOP 


ROL 








0838 7E 00 


3B 


57 




ROR 


BUFFER, X 






083B 88 




58 




DEY 








083C DO F9 




59 




BNE 


SWLOOP 






083E 5E 00 


OB 


60 




LSR 


BUFFER, X 




DROP OLD HI BIT AND PUT DUMMY 


AT HI END 
















0841 CA 




61 




DEX 








0842 10 EE 




62 




BPL 


SWAP 






0844 




63 


* 










0844 




64 


♦FOLLOWING . L-h'i 


0844 




65 


*APPLE 


BYTES 


INTO 7 BIT- 


-MAPPED BYTES. METHOD 


0844 




66 


*IS TO 


ROL 8TH BYTE, THEN 8TH 




0844 




67 


*AND 7TH, THEN 8TH , 7TH 


AND 6TH 


0844 




68 


*AND SO ON 








0844 




69 


* 










0844 A9 07 




70 




LDA 


#$07 




POINTS TO 8TH BYTE IN BUFFER ' 


0846 85 07 




71 




STA 


POINTER 






0848 A9 01 




72 


L00P1 


LDA 


#$01 




NUMBER OF ITERATIONS 


084A 85 06 




73 




STA 


COUNTER 






084G A6 07 




74 


LOOP 2 


LDX 


POINTER 






084E A4 06 




75 




LDY 


COUNTER 






0850 3E 00 


OB 


76 


L00P3 


ROL 


BUFFER, X 




START MOVING BITS j 


0853 CA 




77 




DEX 








0854 88 




78 




DEY 








0855 DO F9 




79 




BNE 


LOOP 3 




■NOT FINISHED WITH PASS 


0857 E6 06 




80 




INC 


COUNTER 




■ADD ANOTHER ITERATION 


0859 A5 06 




81 




LDA 


COUNTER 






085B C9 09 




82 




CMP 


#$09 




•ONLY DONE 8 TIMES 


08 5D DO ED 




83 




BNE 


LOOP 2 




•NOT FINISHED 


085F A5 07 




84 




LDA 


POINTER 




;DONE WITH A GROUP 


0861 18 




85 




CLC 






;GET ANOTHER GROUP OF 8 BYTES 


0862 69 08 




86 




ADC 


#$08 






0864 85 07 




87 




STA 


POINTER 






0866 C9 2F 




88 




CMP 


#$2F 




jONLY WANT TO DO FIRST $27 BYT 


ES 

0868 DO DE 




89 




BNE 


LOOP1 




rBACK FOR MORE 


086A 




90 


* 










086A 




91 


♦BYTES 


ARE NOW SHIFTED, 


BUT 




086A 




92 


♦THERE 


IS A GAP EVERY 8 


BYTES 




086A 




93 


♦NEXT 


STEP IS TO MOVE EVERYTHING 


086A 




94 


♦DOWN 


TO REMOVE THE GAPS 




086A A2 00 




95- 




LDX 


#$00 






086C AO 00 




96 




LDY 


#$00 






086E A9 07 




97 




LDA 


#$07 




;USED TO INDICATE WHICH 


0870 85 06 




98 




STA 


COUNTER 




r BYTES TO SKIP 


0872 B9 00 


OB 


99 


L00P4 


LDA 


BUFFER, Y 






0875 9D 00 


OB 


100 




STA 


BUFFER, X 






0878 E8 




101 




I NX 








0879 C8 




102 




INY 








087A C4 06 




103 




CPY 


COUNTER 




;CHECK FOR THOSE TO SKIP 


087C DO F4 




104 




BNE 


LOOP4 






087E C8 




105 




INY 






;SKIP OVER A BYTE 


087F A9 08 




106 




LDA 


#$08 




; ADJUST COUNTER 


0881 18 




107 




CLC 








0882 65 06 




108 




ADC 


COUNTER 






0884 85 06 




109 




STA 


COUNTER 






0886 C9 2F 




110 




CMP 


#$2F 




;NO NEED TO GO PAST $27 


0888 DO E8 




111 




BNE 


LO0P4 






088A 




112 


* 










088A 




113 


♦40 APPLE i : ' 


SQUEEZE 


088A 




114 


♦DOWN 


TO 3 5 


BIT-MAPPED 


BYTES 




088A 




115 


♦TIME 


TO PUT 


THEM ON THE SCREEN 


088A 




116 


* 










088A A6 05 




117 




LDX 


XSAVE 




r RESTORE VERTICAL POINTER 


088G AO 22 




118 




LDY 


#$22 




rHAVE TO MOVE 35 BYTES 


088E B9 00 


OB 


119 


LOOPS 


LDA 


BUFFER, Y 






0891 91 00 




120 




STA 


(DEST) ,Y 






0893 88 




121 




DEY 








0894 10 FB 




122 




BPL 


LOOPS 






0896 




123 


* 










0896 




124 


♦line 


IS ON 


SCREEN 






0896 




125 


♦NOW THE DESTINATION HAS TO BE ADUSTED 


0896 




126 


• 










0896 A5 00 




127 




LDA 


DEST 






0898 18 




128 




CLC 








0899 69 28 




129 




ADC 


#$28 




rMOVE UP 40 BYTES 


089B 85 00 




130 




STA 


DEST 






089D 90 02 




131 




BCC 


NEXT 






089F E6 01 




132 




INC 


DEST+1 






08A1 E8 




133 


NEXT 


INX 






;GET READY FOR NEXT LINE OF SO 


URCE 
















08A2 EO CO 




134 




CPX 


#$C0 




; APPLE SCREEN ENDS AT $BF 


08A4 FO 03 




135 




BEQ 


ZBACK 






08 A6 4C 17 


08 


136 




JMP 


MAIN 






08A9 




137 


* 










08A9 




138 


♦RESTORE ZERO PAGE 






08A9 




139 


* 










08A9 A2 00 




140 


ZBACK 


LDX 


#$0 






08AB 68 




141 


ZBLOOP 


PLA 








08AC 95 00 




142 




STA 


$o,x 






08AE E8 




143 




INX 








08AF EO 09 




144 




CPX 


#$09 






08B1 DO F8 




145 




BNE 


ZBLOOP 






08B3 58 




146 




CLI 








08B4 60 




147 




RTS 








08B5 




148 


♦TABLE STARTS ON NEXT PAGE BOUNDARY 


08B5 




149 


♦IT IS SHOWN 


AS A MEMORY DUMP, BUT NOT 


08B5 




150 


•LISTED IN THIS SOURCE 


CODE 




08B5 




151 




END 









This is achieved by adding eight to the 
pointer and resetting the counter to 
one. Once the program reaches the end 
of this section, the line has been packed. 



After this, the gaps have to be 
handled. The counter is now used to 
determine which bytes to skip. On the 
first pass through the routine labeled 
LOOP4, X and Y are equal. In essence, 
a byte is just taken from its location 
and put back there. When the value of 
Y is equal to the value in the counter, it 
is time to skip over a byte. Once this is 
done, the counter is increased to the 
next value to be skipped, and a check is 
made to see if the counter has gone past 
the end of the buffer. 



Finally, the line is read to be put on 
the destination screen. This is performed 
in the area of the label LOOPS. Once 
the line is on the screen, the destina- 
tion value and the pointer to the source 
line have to be adjusted. One of the joys 
of normal bit mapping is that the next 
line can be accessed with a simple addi- 
tion. In the case of the PET VM, each 
line contains 40 bytes. Add 40 to the 
present pointer and you are on the next 
line. (Note that this code places the pic- 
ture starting in the upper left edge of 
the screen. To center the image, the 
starting value of the destination has to 
be adjusted. To do this for any bit map, 
take the horizontal byte size, subtract 
35 (the number of bytes in the packed 
Apple line), then divide by two. This 
gives the offset from the left edge. Add 
this value to the start of the destination 
and the picture will be centered hori- 
zontally. To center vertically, subtract 
192 from the vertical resolution of your 
bit map, multiply by the number of 
bytes in a line, and divide by two. Add 
this number to the starting location for 
vertical centering) . 



Once the destination has been ad- 
justed, the source pointer is in- 
cremented and checked against the top 
value. The Apple screen has 192 lines 
(numbered from $00 to $BF). When X 
equals $C0, the program is finished. 



Using the Program 

One feature of this program is that 
it can be used on either the source or 
destination computer. If you have an 
Apple and want to generate a binary file 
that will load directly into the bit map 
of a different computer, use the follow- 
ing steps. Load the hi-res picture into 
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APPLE FEATURE ^H 

page one of hi-res. (Note to non- Apple 
users: this confusing bit of terminology 
has nothing to do with page one of 
memory. Page one of hi-res is at $2000, 
page two at $4000.) Set the destination 
to $4000 and leave the page pointer at 
$20. This can be accomplished by 
changing $812 from $90 to $40 (or, if 
you are reassembling the program, by 
changing line 17 to VM EQU $4000). 
When the program is finished, the 
translated data will be in memory from 
$4000 to $5E00. This data can be loaded 
directly into the memory map of 
another computer. 

To use the program on the destina- 
tion machine, load the program into 
$800. (If it requires relocation, just 
change the value of the JMP near the 
end and the location of the buffer and 
table.) Next, put the Apple hi-res data 
into memory starting at any page bound- 
ary. Eight K of free space is required. If 



the source is stored somewhere other 
than $2000, change the value in the 
line labeled SETUP to the correct page 
of memory. Then, if your hardware re- 
quires, enable the visible memory. A 
few seconds after you run the program, 
the picture will be on your screen. 



Though the Apple uses color, and 
pure bit maps are monochrome, the pic- 
ture will contain a nice assortment of 
gray scales, especially if the original 
image made use of some of the dithered 
colors that can be produced on the Apple. 

This method should also work if 
you want to put an Apple picture on the 
Atari. Use GRAPHICS 8. Again, you 
can either translate the picture while it 
is in the Apple, and then load it above 
the display list, or put the source into 
the Atari and move it up into display 
memory. 



If your machine is unable to read 
Apple tapes, data can still be transfer- 
red using a modem or other form of in- 
terface. For those of you with a PET and 
the MTU VM, the routine written by 
Frank Covitz to read Apple tapes is in- 
cluded in this issue. The routine con- 
sists of a basic driver and a machine- 
language routine that simulates Apple 
tape input on the PET. To use it, enter 
the start and end address of the tape 
data in hex. The routine will read the 
tape and indicate whether the load was 
good. 

As an interesting exercise, you 
might want to try reversing the pro- 
cedure, producing an Apple image from 
a standard bit map. That way we can all 
swap pictures. 

David Lubar may be contacted at 1809 
Cedarwood Drive, Piscataway, NJ 08854. 

~~~ ~ JMCftO 






Almost as 



yung a bat or thrown a baseball - if 
atcheti n TV or in person, then 

sbail is . 3rt of them all. 

And now Datamost brings you r sebal! 

game of them all - World Series 

i is so fast and the Hi-Res graphics so realistic that, for the 

i the fun, all the thrills of professional style 

baseball. You can pitch mside or outside curves - move your outfield 

around . . . field hits ... cut the runner off . . . use strategy just like a 

Whether you're e \e slamming a home run or out in the field, 

you know you're So, let's PLAY BALL. Get 

your copy of Won-' Series Baseball today. You'll agree . . . it's a hit! 

Only $29.95 for the Apple II* 
Requires paddles. 
At computer stores* or: 



MDATAMOS1 



9748 Cozyeroft Ave. 
Chatsworth, CA 91311 
(213)709-1202 



ademark of Apple Computer, Inc. 
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Commodore 
Computers Bloom 
with CP/M® , Hard Disk 
and Multi-User 
Capability. 

now your commodore can blossom Into a full-blown 
CP/M-based or multi-user business system with the 
addition of one of these Innovative peripherals. Your 
Commodore plus the SOFTBOX gives you a single-user 
cp/m system, commodore plus hardbox puts Pet 
software on corvus Disk Drives and multiplexing units. 






on 



RUN CP/M WITH SOFTBOX 
ON FLOPPY AND HARD DISK. 

Add SOFTBOX. The Z80-based computer which 
connects to your Commodore pet or cbm 
through the IEEE bus. 

Now you have the ability to run any CP/M 
software or application, giving you a universe of 
computing capabilities you could only wish for 
until now. 

Simply by plugging the small systems soft- 
box into your commodore computer's IEEE-488 
port and loading the cp/m disk, your computer 
will run under the worlds most popular disk 
operating system, no internal connections or 
modifications to your computer are necessary. 

Applications packages designed to work with 
specific terminals (like Lear Siegler ADM3A, 
Televideo 912 or Hazeltine 1500) need no 
modification to work with your computer's 
screen, since the SOFTBOX allows your computer 
to emulate any of these devices. 

interfaces that come with your SOFTBOX let 
you add the Corvus Hard Disk and any RS-232C 
peripheral. You can run a printer, and even talk 
to another CP/M based system. 

90-Day warranty. Suggested retail $895 
Complete line of CP/M software available. 




SMALL SYSTEMS ENGINEERING 

222 B View Street 

Mountain View, CA 94041 

(415) 964-8201 

CP/M is a registered trademark of Digital Research. 
© 1982 Small Systems Engineering Corp. 



HARDBOX GIVES PET DOS 
MULTI-USER AND HARD DISK 
CAPABILITY. 

The HardBox introduces your pet software to 
the world of high-capacity, high speed disk 
storage, it acts as an intelligent controller for up to 
four corvus Winchester disk drives. Each Corvus 
drive can have a capacity of 6, 10 or 20 million 
bytes. 

The HardBox is designed to be software- 
compatible with PET DOS version 1 or 2, so that it 
will work with existing programs. The HardBox is 
designed to appear to the PET as a fast, high- 
capacity floppy disk unit. 

When used with the Corvus range of drives, 
the HardBox provides much more than just a hard 
disk interface. By using an 8-way multiplexing unit, 
up to eight PET users, each equipped with a Hard- 
Box, may simultaneously address the same hard 
disk. By using two levels of multiplexing, up to 64 
users may be accommodated. The hard disk may 
be divided logically into user areas. 

A comprehensive set of utility programs are 
provided with the hardbox for file transfer, hard 
disk configuration, mirror backup, system 
maintenance etc. 

90-Day warranty. Suggested retail S695. 
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APPLE FEATURE 



PET Communicates 
with Apple 



by Frank Covitz 



This article describes how 
the Apple II and PET can 
communicate using the Apple II 
cassette format. 



Requires 

PET with BASIC 



3.0 



The Commodore PET and the Apple 
use the same microprocessor, the ex- 
cellent 6502, running at ca. 1 MHz. As 
such, you might think it would be rela- 
tively easy to transport data from the 
one to the other. Alas, this is not the 
case! Of course, data could be trans- 
ferred via modems or by physically 
connecting the two through some sort 
of I/O port, but this would limit the 
applicability to those who had the re- 
quired hardware. Fortunately, there is a 
simpler (and cost-free) way: through 
the cassette port. 

The programs given in this article 
are to be used within the Commodore 
machine, and allow the PET to write 
and read Apple binary tapes. With 
binary format, any type of data can be 
transmitted, including ASCII as well as 
machine code. The tape format is such 
that the total number of bytes must be 
known (so that the checksum will 
come out right) . The data to be written 
to tape must be in the PET's memory (I 
conveniently start data at $2000), and 
conversely, on read, the start and end 
addresses must be specified. (The start 
address is arbitrary, but the total 
number of bytes to be read must agree 
with what is on the tape.) 

I have routinely dumped both 
machine-code programs and data as 
well as ASCII text with no hitches. 
However, on read, it appears to be 
necessary to start the tape a few 
seconds into the leader portion. Ob- 
viously, this system could work quite 
well without the actual intervention of 
tape, if the two machines can be 
brought side-by- side, and an electrical 
hook to the tape port on the PET is 
made. 
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Listing 1 












188 SB-1 


749:ER= 


SR+2 :CH=SR+4 :ft=6*2S6 




118 INPUT" START 


ADDRESS < HEX > " .? ft* 




128 G0SUB288 


:P0KE Sfi, 


LXiPOKE Sfl+1,HK 




138 INPUT "END ADDRESS 


<HEX>" ;ft* 




148 G0SUB288 


SPOKE ER, 


LXsPOKE er+i,h;-; 




188 SVS'C 


A> 










181 A*=" 


GOOD 


' 








182 IF PEEK<CH> 


=255THENft*=s"BRD M 




183 PRINTR*+ 


1 LORD" 






190 END 












200 D-8 : 


FORL = 


e&TOLEN < R*>- 1 : B*=M I D* < ft* . 


- LEN < R* > -L , 1 > s B*BSC < B* > 


218 I FED 


47RND8-C58 THENB«*B-48 




228 IFB> 


64THENB 


=B-S5 






238 D=D+B*16- 


tLs 


NEXTL 






240 H&"D 


/2S6 


sUi 


= D - 2 56 * H K : R E T URN 




Listing 2: Appleread 








0800 












0800 








APPLEREAD 




0800 














0800 














0000 






Al 


EPZ $00 


; ADDRESS POINTER 


0002 






A2 


EPZ $02 


? ENDAD POINTER 


0004 






CHKSUM 


EPZ $04 




00D4 






DEVICE 


EPZ $D4 


r CURRENT DEVICE 


00F9 






MOT1 


EPZ $F9 


; MO TOR STATUS 


E810 






PIAL 


EQU $E810 




E811 






CRA 


EQU 5E811 




FQ12 






STTAPE 


EQU $F812 




FCA8 






MO TOFF 


EQU $FCA8 




0005 






CRCT 


EPZ $05 




0000 






ZERO 


EPZ $00 




0600 








ORG $600 




0600 












0600 












0600 A9 01 






START 


LDA #1 


;TURN ON MOTOR #1 


0602 85 D4 








STA DEVICE 




0604 20 12 


F8 






JSR STTAPE 




0607 78 






STRT1 


SEI 


;STOP INTERRUPTS 


0608 20 C4 


06 






JSR DELAY 


j DELAY 3.5 SEC 


060B A2 06 








LDX #6 




060D B5 FF 






STRT2 


LDA $FF,X 


;SAVE LOC'NS 0-5 


060F 48 








PHA 


?ON STACK 


0610 CA 








DEX 




0611 DO FA 








BNE STRT2 




0613 AD D5 


06 






LDA STAD 


; INITIALIZE POINTERS 


0616 85 00 








STA Al 




0618 AD D6 


06 






LDA STAD+1 




061B 85 01 








STA Al+1 




061D AD D7 


06 






LDA ENDAD 




0620 85 02 








STA A2 




0622 AD D8 


06 






LDA ENDAD+1 




0625 85 03 








STA A2+1 




0627 AD 11 


E8 






LDA CRA 


;SAVE CONTROL REG 


062A 48 








PHA 




062B 29 C6 








AND #411000110 


f FORCE BITS 5430 TO 


062D 09 02 








ORA #%00000010 


r FORCE BIT 1 HIGH 


062F 8D 11 


E8 






STA CRA 




0632 2C 10 


E8 






BIT PIAL 


r RESET CA1 


0635 20 AE 


06 




READ 


JSR RDBIT 


rFIND AN EDGE 


0638 A9 FF 








LDA #$FF 




063A 85 04 








STA CHKSUM 




063C 20 AB 


06 






JSR RD2BIT 


:GET BIT 


063F A2 64 






RDO 


LDX #100 


;GET AT LEAST 100 SYNC'S IN A 


ROW 












0641 AO IE 






RD1 


LDY #$2 3 -CRCT 




0643 20 AE 


06 






JSR RDBIT 




0646 90 F7 








BCC RDO 


;NOT SYNC, START OVER 


0648 CA 








DEX 




0649 DO F6 








BNE RD1 
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Listing 2 (Com 


064B 


A0 


IF 




064D 


20 


AE 


06 


0650 


BO 


F9 




0652 


20 


AE 


06 


0655 


AO 


36 




0657 


20 


9D 


06 


065A 


81 


00 




065C 


45 


04 




065E 


85 


04 




0660 


20 


8E 


06 


0663 


AO 


30 




0665 


90 


FO 




0667 


20 


9D 


06 


066A 


AO 


00 




066C 


C5 


04 




066E 


FO 


02 




• 0670 


AO 


FF 




0672 


68 






0673 


8D 


11 


E8 


0676 


A2 


00 




0678 


68 






0679 


95 


00 




067B 


E8 






067C 


EO 


06 




067E 


DO 


F8 




0680 


8C 


D9 


06 


0683 


A9 


01 




0685 


85 


F9 




0687 


A9 


3D 




0689 


20 


A8 


FC 


068C 


58 






068D 


60 






068E 








068E 








068E 








068E 


A 5 


00 




0690 


C5 


02 




0692 


A5 


01 




0694 


E5 


03 




0696 


E6 


00 




0698 


DO 


02 




069A 


E6 


01 




069C 


60 






069D 


A2 


08 




069F 


48 






1 06A0 


20 


AB 


06 


06A3 


68 






06A4 


2A 






06A5 


AO 


35 




06A7 


CA 






06A8 


DO 


F5 




06AA 


60 






06 AB 


20 


AE 


06 


06AE 


88 






06AF 


24 


04 




06B1 


2C 


11 


E8 



06B4 
06B6 
06B9 
06BB 
06BE 
06C1 
06C3 
06C4 
06C7 
06C9 
06CB 
06CE 
06CF 
06D1 
06D2 
06D4 
06D5 
06D5 
06D5 
06D5 
06D7 
06D9 
06D9 



10 F8 
AD 11 E8 
49 02 
8D 11 E8 
2C 10 E8 
CO 80 
60 

20 C7 06 
A2 00 
AO 00 
20 D4 06 
88 

DO FA 
CA 

DO F5 
60 



00 00 
07 FF 



RD2 LDY 
JSR 

BCS 
JSR 
LDY 

RD3 JSR 
STA 
EOR 
STA 
JSR 
LDY 
BCC 
JSR 
LDY 
CMP 
BEQ 
LDY 
PLA 
STA 
LDX 

RESTOR PLA 
STA 
INX 
CPX 
BNE 
STY 
LDA 
STA 
LDA 
JSR 
CLT 
RTS 



#$24-CRCT 

RDBIT 

RD2 

RDBIT 

#$3B-CRCT 

RDBYTE 

(A1,X) 

CHKSUM 

CHKSUM 

NXTA1 

#$35-CRCT 

RD3 

RDBYTE 

#0 

CHKSUM 

*+4 

#$FF 

CRA 
#$0 

ZERO,X 

#6 

RESTOR 

ERROR 

#1 

MOT1 

#$3D 

HO TOFF 



SUBROUTINES 



NXTA1 LDA 
CMP 
LDA 
SBC 
INC 
BNE 
INC 
RTS 
RDBYTE LDX 
RDBYT2 PHA 
JSR 
PLA 
ROL 
LDY 
DEX 
BNE 
RTS 
RD2BIT JSR 
RDBIT DEY 
BIT 
BIT 



Al 

A2 

Al+1 

A2+1 

Al 

*+4 

Al+1 

#8 

RD2BIT 

#$3A-CRCT 

RDBYT2 

RDBIT 

CHKSUM 
CRA 



DELAY 
DLYO 
DLY1 
DLY2 



BPL RDBIT 

LDA CRA 

EOR #%O0OOO010 

STA CRA 

BIT PIAL 

CPY #$80 

RTS 

JSR DLYO 

LDX #0 

LDY #0 

JSR DLY3 

DEY 

BNE DLY2 

DEX 

BNE DLY1 

RTS 



RAM STORAGE 



STAD 

ENDAD 

ERROR 



DBY 00 

DBY 00+57FF 

EQU * 
END 



LOOK FOR SYNC ' S 
EDGE ONLY 
LOOP ON SYNC'S 
SKIP NEXT HALF CYCLE 
INDEX FOR 0/1 TEST 
GET A BYTE 
AND STASH IT 
MAINTAIN CHECKSUM 

UPDATE ADDRESS 
COMPENSATE 
LOOP UNTIL DONE 
READ CHECKSUM 
DEFAULT Y=0(GO0D) 



;Y=$FF MEANS BAD 
; RESTORE CRA 



; RESTORE LOC ' NS 0-5 



rSAVE ERROR COND 



;TURN OFF MOTOR 



rSET CARRY ON DONE 
r UPDATE ADDRESS 



;READ TWO TRANSACTIONS 

rFORM THE BYTE VIA CARRY FLAG 



rTIMING 
;DO 8 BITS 



(2 STATES) 

(WASTE 3 STATES) 

(4 STATES) WAIT FOR TRANSITIO 

(3,2 STATES ) 

(4) FLIP ACTIVE CA1 COND 

(2) 

(4) 

(4) 

(2) 

(6) 

DELAY CA 2 . 2 SEC 

DELAY 1 . 1 SEC 



RESET CRA BIT 7 . 
SET CARRY ON Y 



WASTE 12 STATES 
(2) 
(3) 



;(3) 



; DUMMY START ADDRESS 
? DUMMY END ADDRESS 
;0=GOOD LOAD, $FF=BAD 



Listing 3 

1 SB= 1 2* 1 6+9 : EB^SR+2 : Fl=6*256 

20 I NPUT " STRRT ADDRESS < HEX > " % R* 

30 GOSUB 180! POKE 8ft -L^ sPOKE Sfl+l^HX 

40 t NPUT " END ADDRESS < HEX > " .? A* 

50 GOSUB 100: POKE Efl^LKsPOKE ER+1„HX 

60 I NPUT "TAPE DRIVE 1 OR 2" ?D 

70 IF D=2 THEN R=R+3 

SO SVS<R> 

30 END 

1 00 D=0 : FORL=0TOLEN < R* ■' - 1 s B*=»M I D* < R* ,<- LEN < R* > ~L , 1 > = B=fiSC < B* > 

110 I F B> 4 7flN DB< 38 T HE NB= B - 4 S 

120 IFB>64THENB=B-55 

1 30 D= D + B* 1 6 1 L : NEXT L 

140 H^D/256 .LX-D-2S6»HX iRETURN (LMng 4 Qn ^ page) 



■H APPLE FEATURE 

The assembly source below and 
simple BASIC drivers were created by 
close examination of the Apple ROM 
source code (from the "red book"), 
with particular analysis of the timing, 
since all are derived via software loops. 
Since the code is essentially Apple 
copyrighted, permission for this article 
was granted by Apple Corp. 

When used with the BASIC driver, 
the prompts for start and end addresses 
are given, and on load the system 
returns with "GOOD LOAD" if the 
checksums agree. Any "BAD LOAD" 
messages I have gotten were generally 
the result of giving the wrong addresses. 
So, if you send, someone an Apple 
binary tape, be sure you give the start 
and end addresses of the data on the 
tape. Note: this should be START 
ADDRESS, END ADDRESS not START 
ADDRESS, END ADDRESS + 1. 

I have used the same scheme for 
transferring data from KIM to Apple. 
The KIM can only conveniently write 
Apple tapes; because of the KIM's PLL 
circuitry for tape input, it cannot read 
them. Since the PET can read it and the 
KIM can write it, I have frequently used 
Apple tape format to transfer KIM data 
to the PET — without an Apple in sight! 

Frank Covitz may be contacted at Deer 
Hill Road, Lebanon, NJ 08833. 



Apple Education 

Physics: 11 diskettes, 75 programs — 
$200. May be ordered separately. 
Happy Face [four word games) — $15; 
Dinosaurs — $15; Aquarium — $25; 
Christian Education - $15. Above 
programs have extensive hi-res 

fraphics. Peachy Writer text editor — 
24.95; Grade Reporter - $19.95. 
■ '.og. 
Cross Educational Software 
Bo ' A 

RvistQc, m mm 

(318) 255-8921 



Target - An AIM 65 Newsletter 

Need information for your AIM 65 
computer? News, software, and 
hardware arc examples of items covered 
in the newsletter. Yearly subscription 

.'Oft/! £3 rria, 

$12.00 elsewhere. Back issues are 
available beginning with 1979 at the 
same per year rate. 

Target 

C/O Donald Clem 

RR#2 

Spencerville, OH 45887 

(Continued on page 51) 
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Listing 4 








m ■■- — — _____ 


0800 


; APPLEWRITE 




^ 


0800 








i 




0800 








1 OSI-C4PMF 




00C9 
00CB 


CUR AD 
ENDAD 


EPZ $C9 

EPZ $CB 




! ' 




E842 


DDRB 


EQU $E842 




■ 




E840 


PORTB 


EQU $E840 




GOBBLER MANIA 




F847 
FCA8 


PROMPT 
MOTOFF 


EQU $F847 
EQU SFCA8 




■ 




0OD4 


DEV 


EPZ $D4 




\ j Attempt the maze eating 
1 all you can but don't get caught 




00F9 

00FA 
0008 


MOT1 
MOT2 
TPBIT 


EPZ SF9 
EPZ $FA 
EPZ %00001000 




Full color & sound! 




0800 










5 1 / 4 in. disk .... $12.95 




0600 

0600 A9 01 

0602 2C 


START 


ORG $0600 
LDA #1 
BYT $2C 


i DEFAULT TO TAPE #1 

7 DUMMY BIT INSTRUCTION 




SENTINEL 




0603 A9 02 
0605 85 D4 
0607 20 47 F8 


START2 


LDA #2 
STA DEV 
JSR PROMPT 


r ENTRY FOR TAPE #2 
;PUT IN DEVICE # 
rPLAY & RECORD 




Is there any enemy around ■ 




060A 78 

060B AD 42 E8 

060E 09 08 




SEI 


t PREVENT INTERRUPTS 




the next hall? Better ready 






LDA DDRB 
ORA #TPBIT 


? FORCE BIT 3 AS OUTPUT 




your crossbow for battle. 




0610 8D 42 E8 
0613 A9 08 




STA DDRB 
LDA #TPBIT 






5 1 / 4 in. disk .... $19.95 




0615 49 FF 
0617 2D 40 E8 
061A 8D 40 E8 




EOR #$FF 
AND PORTB 
STA PORTB 


r FORCE A LOW AT START 




We also have: ALPHA BASE, 




061D 20 37 06 
0620 A9 08 




JSR WRITE 
LDA # TPBIT 
EOR #$FF 


;NOW WRITE THE TAPE 




RADAR TANK, HYPER ATTACK, 




0622 49 FF 




; FORCE A LOW AT END 




and many utilities too! 
All in 100% machine code. 




0624 2D 40 E8 
0627 8D 40 E8 
062A A9 01 




AND PORTB 
STA PORTB 
LDA #1 


rTURN OFF TAPE MOTOR 
;SET MOTOR STATUS 




Send $1 for complete 




062C 85 F9 
062E 85 FA 




STA MOT1 
STA MOT2 






catalog to: 

A 




0630 A9 3D 
063 2 20 A8 FC 

0635 58 

0636 60 




LDA #$3D 
JSR MOTOFF 
CLI 
RTS 


;TURN OFF TAPE MOTOR 




*$-* INTERESTING 




0637 A9 40 
0639 20 5F 06 


WRITE 


LDA #$40 
JSR HEADR 


; WRITE 10 SEC. HEADER 




X SOFTWARE 




063G AO 25 
063E A2 00 


WR1 


LDY #$27-2 
LDX #0 


; TIMING? 




* 21101 S. Harvard Blv. 




0640 41 C9 




EOR (CURAD, X) 


r CHECKSUM 




Torrance, Cal. 90501 


0642 48 




PHA 


;SAVE CHECKSUM 




^H 


0643 Al C9 




LDA ( CURAD, X) 


;GET BYTE FROM MEMORY 




^K 


0645 20 56 06 




JSR WRBYTE 


7 PUT ON TAPE | 




HHHH^HBn|^BB^ 


0648 20 89 06 




JSR NXTAD 


; ADVANCE INDEX 


^■| ..._■'-.-_ :_—_-_ . ~~ ~"~~ 


064B AO IB 




LDY #$lD-2 


; TIMING? 


^^B HI 


064D 68 




PLA 


r RECALL CHECKSUM 


^^_------_______---------_____________________mi 


064E 90 EE 




BCC WR1 


; CARRY IS CLEAR UNTIL END 








0650 AO 20 
0652 20 56 06 




LDY #$22-2 
JSR WRBYTE 


r TIMING? | 
r WRITE CHECKSUM 










0655 60 
0656 
0656 
0656 

0656 A2 10 


RTS 
J 
? ** WRITE A BYTE TO TAPE 

; 

WRBYTE LDX #$10 


?DO 16 BITS 




OHIO SCIENTIFIC 






THE WIZARD'S CITY — 




0658 


JWRBYT2 


ASIA ; SHIFT HIGH BIT 


TO CARRY 




search for gold in the dun- , 




0658 OA 

0659 20 6C 06 


WRBYT2 


ASL 

JSR WRBIT 


; SHIFT HIGH BIT TO CARRY 
;AND WRITE TO TAPE 




geons beneath the Wizard's ! 




065C DO FA 




BNE WRBYT2 


; RESULT OF "DEX" ' 




city or in the surrounding ] 




065E 60 
065F 




RTS 


;GO BACK FOR NEXT BYTE 




forest. A dynamic adventure 




065F 


7 ** WRITE HEADER ** 






allowing progress in strength 




065F 

065F AO 49 


HE ADR 


LDY #$4B-2 


? TIMING? 




and experience. All OSI — 




0661 20 71 06 




JSR ZERDLY 


?650 USEC 




cassette $12.95, disk $15.95. 




0664 DO F9 
0666 69 FE 




BNE HEADR 
ADC #$FE 






OSI HARDWARE 15% OFF 
RETAIL PRICES! 




0668 BO F5 
066A AO IF 
066C 20 71 06 


WRBIT 


BCS HEADR 
LDY #$21-2 
JSR ZERDLY 


7 TIMING? 
?ZERO BIT 




GALACTIC EMPIRE — a strat- 




066F C8 
0670 C8 




INY 
INY 






egy game of interstellar con- 




0671 88 

0672 DO FD 


ZERDLY 


DEY 

BNE ZERDLY 


? DELAY LOOP 




quest and negotiation. Com- 




0674 90 05 




BCC WRTAPE 


; CARRY STATUS SET PREVIOUSLY 




pete to discover, conquer, and 




0676 AO 30 
0678 88 


ONEDLY 


LDY #$3 2-2 
DEY 


;ONE BIT 




rule an empire with the com- 




0679 DO FD 




BNE ONEDLY 






puter or 1-2 other players. C4P, 




067B 










C8P cassette $12.95, disk 




067B 
067B 


? ** WRITE TO TAPE HERE " 






$15.95. 




067B 


• MUST TOGGLE TAPE OUTPUT BIT 






AIR TRAFFIC ADVENTURE - I 




067B 
067B 


; A,X AND CARRY MUST BE PRESERVED 




a real time air traffic simula- 




067B 48 


WRTAPE 


PHA 


rSAVE A 




tion. C4P, C8P disks $15.95. 




067C AD 40 E8 
067F 49 08 




LDA PORTB 
EOR # TPBIT 


;FLIP BIT 3 




Plus S-FORTH, PACKMAN, 




0681 8D 40 E8 




STA PORTB 






CRAZY BOMBER, ADVEN- 




0684 68 

0685 AO 2A 




PLA 

LDY #$2C-2 


7 FETCH A 
;TIMING? 




TURE, TOUCH TYPING, IN- 




0687 CA 




DEX 






TELLIGENT TERMINAL and 




0688 60 
0689 




RTS 






more. Send for our free 




0689 


; ** ADVANCE POINTERS ** 






catalog including photos and 




0689 

0689 A5 C9 


NX TAD 


LDA CURAD 






complete descriptions. 




068B C5 CB 
068D A5 CA 




CMP ENDAD 
LDA CURAD+1 


7 CHECK CURAD= ENDAD 




(312)259-3150 




068F E5 CC 
0691 E6 C9 




SBC ENDAD +1 
INC CURAD 


; CLEVER USE OF CARRY 




Aurora Software Associates 




0693 DO 02 




BNE NXT1 






B 37 S.Mitchell ™ 
— " Arlington Heights »» 
%*__■ Illinois 60005 ___*^ 




0695 E6 CA 
0697 60 
0698 


NXT1 


INC CURAD+1 

RTS 

END 


f CARRY SET AT CURAD=ENDAD 

JMCOO 
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Build performance 

into your system using the 

OS-9™ toolbox! 




■ Over 40 utility commands 
I Friendly "Shell" command interpreter 
I Tree-structured multilevel file directories 
I Full timesharing support with log-in and file security 
I Fast, secure random and sequential access files 
I Comprehensive English language error messages 



THE OS-9 OPERATING SYSTEM 

Unix* -based, multitasking, modular, and versatile: these key features are some of the 
reasons why more 6809 computer manufacturers have selected OS-9 as their standard 
operating system than any other O.S. And OS-9 has been put to work by thousands of 
users in almost every conceivable computer application in business, science, in- 
dustry, education, and government. 

Your operating system should not be a barrier between you and your com- 
puter! OS-9 is very friendly and easy to use. Due to its modular structure it's 
easy to customize, plus its comprehensive documentation shows you exactly 
how to interface it to just about any I/O device. 

OS-9's advanced features unleash the performance potential of almost any 
6809 computer— large or small. In many respects the OS-9/6809 combina- 
tion is more powerful than many minicomputers! 

There are two basic versions of OS-9. Both have the same basic features 

and capabilities. OS-9 Level One runs on small to medium sized systems having up to 

64K memory. The Level Two version runs on medium to large size systems having 

memory management hardware and up to 1 megabyte of memory, and includes record and 

file locking for multiuser database applications. 

Here are just a few reasons why you should insist on OS-9 for your microcomputer system. 



I Compact real-time multitasking executive 

■ Hardware or software memory management 

■ Device independent interrupt-driven I/O 

■ Fully ROMable for small control systems 

■ Standard versions available from manufacturers of most 
popular 6809 computers 



OS-9 PASCAL™ LANGUAGE 
COMPILER 

■■■■■■■I The OS-9 Pascal language compiler is 
! ^^^^ I tne most com Pl ete anQl versatile Pascal 
! W f^W available for the 6809. OS-9 Pascal has 
■ ^*\^k the unusuai ca P aDilit V of generating 
H d^^^HI P-code for interpretive execution while 
; V ^f^Ml debugging OR highly optimized 6809 as- 

U &k I sembly language source code output for 

maximum speed. Another feature of OS-9 Pascal is its "virtual 
memory" P-code interpreter that lets you run incredibly large 
Pascal programs. OS-9 Pascal meets the ISO 7185.1 Standard 
and the complete Wirth/Jensen specification. 

CIS COBOL™ COMPILER 

6809 CIS Cobol is a compact, interactive 
and standard Cobol language compiler 
W M O — I which is ideal for the most demanding 
* M o/ business applications. Standard features 
are: ISAM, Debug, ACCEPT/DISPLAY, and 
Interprogram Communications modules. 
CIS Cobol is the preeminent microcom- 
puter Cobol in the industry, and the OS-9 version retains full 
compatibility with CP/M applications software, CIS 
Cobol meets the ANSI 1974 Level One COBOL 
standard and is GSA certified. Also available is Micro 
Focus' FORMS 2, an optional automatic program 
generator that lets you interactively design screen- 
oriented applications with ease. 




BASIC09™ STRUCTURED BASIC 
INTERACTIVE COMPILER 

HBasic09 is the fastest and most com- 
prehensive full Basic language available 
for the 6809. It combines standard Basic 
with the best features of Pascal. It is a 
unique interactive compiler that com- 
bines compiler speed, interpreter friend- 
liness, and superlative debugging facili- 
ties- RunB, a ROMable run-time system for compiled Basic09 
programs is now available as an option. 

C LANGUAGE COMPILER 

C— the systems language of the future- 
is here today on OS-9. This is a complete 
implementation of the Unix Version 7 C 
language including INT, CHAR, SIGNED, 
UNSIGNED, FLOAT and LONG data types, 
structures, unions, standard C library, 
and a full preprocessor with macro defi- 
nitions. Generates fully reentrant 6809 assembly language 
source code output. 

For information contact your computer supplier, or 

MICROWARE® 

Microware Systems Corporation 

5835 Grand Avenue, Des Moines, Iowa 50312 

Phone 515-279-8844 • Telex 910-520-2535 




*Unix is a trademark of Bell Laboratories. CIS Cobol is a trademark of Micro Focus, Inc. OS-9 and Basic09 are trademarks of Microware and Motorola, Inc. 
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EPROM PROGRAMMER 
FOR PET AND ATARI COMPUTERS 

The BRANDING IRON is an EPROM programmer especially 
designed for PET and ATARI computers. Programs 2716 
and 2532 type EPROMs. The PET version plugs into the 
cassette and I/O port and comes with software which adds 
the programmer commands to the PET monitor. The 
ATARI version plugs into controller jacks and comes with 
a full fledged machine language monitor which provides 
3Q commands for interacting with the computer and the 
BRANDING IRON. 




CONVERT YOUR PET 

INTO A TERMINAL 

$129.95 

RS232 Hardware and cable, 



ware. Upload and Download, 
communicates in ASCII, status 
line, built-in file translator. A 
complete package, all you 
need is a modem and we sell 
them too. 



PET - $75.00 



ATARI - $119.95 




Need a Modem? 

We sell the Signalman Direct Connect 
Modems for $89.50 (includes cable) 





CSE means OSI 

Custom After Market Software 
for C1P and C4P machines 



•Basic Enhancer: 

Renumber, Auto Sequencer, Screen Control func- 
tions, and tape 1/0 system that is faster and has file 
names 

C1P $21.95 

C4P .$29.95 

Modified Monitor Rom Chip: 

Now get indirect jump-capabilities just tike those 
in the C1P and for no extra charge CSE will burn in 
your machines serial number $16.95 

*NOTE: The C4P version of the Basic Enhancer in- 
cludes the modified monitor Rom chip required for 
proper program functioning. 

This is only a partial listing of our products. Write us 
for information on new disk programs or send $2 for 
catalog. Please include $2.00 shipping and handling 
with orders. 

Computer 

Science 

Engineering 

Box 50 • 291 Huntington Ave. Boston 02115 



Olympic 
Sales 

f* SERVING YOU SINCE 1947 

Company 



CABLE: "OLYRAV" LSA 

Main Showroom & Offices: 

21 6 So. Oxford Avenue 
(P. O. Box 74545) 

Los Angeles, CA 90004 
Telex: 67 34 77 



WE HONOR VISA 
andMASTERCHARGE 



ORDER DESKS 

open 6 days a week! 

7:00 am to 7:00 pm Mon- Sat 

Order Desks: (213)739-1130 



TOLL-FREE TOLL-FREE 

(outside Calif.) (within Calif.) 
800-421-8045 800-252-2153 



Prices shown are for mail or phone orders; 
Walk-in slightly higher. 



Goods subject to availability; 
OSC will meet or beat almost 
any advertised price as long as 
the competition has the goods 
on hand; not responsible for 
typographical errors; prices & 
specifications subject to change 
without notice; this ad supercedes 
all previous ads; min shpg & hndlg 
$5.95; Send $2 for 1 12-pg catalog 



I'll 



HEWLETT 
PACKARD) 

$1885.00 



HP-87 

32K Bytes 

82907 A 32 K Mem. mod. 239.00 
64KMem.mod. 337.00 
128K Mem. mod. 537.00 



82908A 
82909A 
HP85A 
HP-125 
HP-41 C 




Computer 
Computer 
Prog, scientific 



HP-41 CV Prog, scientific 



HP-4t 

HP-41 

HP-41 

821 06A 

62170A 

821 60A 

821 61 A 

821 62 A 

HP-97 

HP-67 

HP-32E 

HP-33C 

HP34C 

HP37E 

HP-38C 

HP-11C 

HP-12C 

B2905A 

82901 M 

9895A 

2631 B 

2601 A 



Card reader 
Printer 
Optical wand 
41 C Memory module 
41 C Quad mem. mod. 
HP I L interface 
Cassette drive 
HP-IL printer 
Prog, scien/printer 
Hand -held fully prog 
Scientific 
Prog, scientific 
Adv. prog, scientific 



Prog, financial 
Prog, scientific 
Prog, financial 
Impact printer 
5%"dual drive 
8" dual 1rive 
Impact printer 
Letter qual. ptr. 



85 15001 Mass storage ROM 
85-15002 Plot/print ROM 



85-15003 I/O ROM 
85-15004 Matrix ROM 
85 15005 Adv. prog. ROM 
85-15007 Assembler ROM 
82903A 16K mem. module 
82937A HP-IB interface 
B2939A Serial interface 
82940 A GPIO interface 
82941 A BCD interface 
82949A Parallel ptr. int. 
HP-7470A Hi-speed color 

qrphc pjtr w/intrfc 



$1985.00 

1985.00 

188.00 

248.00 

169.00 

297.00 

99.00 

26.00 

84.00 

109.00 

437.00 

397.00 

584.00 

309.95 

58.95 

93.95 

114.00 

77.95 

119.00 

114.00 

127.00 

619.00 

1699.00 

4499.00 

2999.00 

2999.00 

124.00 

124.00 

239.00 

124.00 

124.00 

239.00 

169.00 

328.00 

338.00 

408.00 

408.00 

239.00 

1269.00 



While supply lasts 

CLOSE-OUT ON PRINTERS 
PAPER TIGER by I DS 

Model Retail Our Cost We Sell 

460 G 1094.00 733.00 699.95 

445 G 894.00 599.00 579.95 

445 795.00 556.00 536.00 

CENTRONICS 

739-1 895.00 650.00 550.00 

737 895.00 610.00 499.00 



NewTI-99/4A-48KRAM 
100% Tl parts w/Extended Basic 
orTI-LOGO Re:$l300 y/C.-ff$689.9 5 

Texas Instruments 
Home Computer 




TO" color monitor high res 
32K memory module 
Extended Basic 
Speech synthesizer 
Disk memory drive 
Telephone coupler (modem) 
Printer (solid state) 
TI-LOGO 



RETAIL Your Cost 

374.95 339.95 
399.95 314.95 
100.00 75.00 
149.95 129.95 
499.95 394.95 
224.95 189.95 
399.95 319.95 
250.00 99.95 



i SANYO 



MONITORS 



High resolution, number one seller! Retail Cost 

VM4509 9"B&W 190.00159.95 

VM4215 15"BSW(belowourcost) 349.00189.95 

DM5109 9" Green VM4215 limited oft* 200.00169.95 

DM8012 12"B&W 250.00 199.95 

DMB112 12" Green 260.00 209.95 

DMC601 3 1 3" Color, hi quality 470.00 399.95 

DMC6113 13" Color RGB hi res 995.00 799.95 

DM2012 <NEW)12"B&W 179.00139.95 

DM2112 (NEW)12"Green 199.00159.95 
Free w/purchase of each Sanyo monitor one $49.00 LCD pen watch 



ATARI in stock 
COMPUTERS 



FOR ATARI 400 & 800- 

GHOST HUNTER (similar to Pac-Man) 

Disk $34.95 Cassette $29.95 



Retail Your Cost 

1080.00 689.95 
1280.00 789.95 



Model 

800 16K 

800 48 K 

BOO 160K 

(800 32K + 128 RAM disk) 1299.95 

810 Disk drive 600.00 469.95 

Atari VisiCalc 200.00 169.95 

825 Impact Ptr 1000.00 779.95 

—ATARI 400- 



Personal 

Computer 

System 



SUPER SPECIAL-ATARI 400 <16K> 

Reiail:S595.00 Your Cost; $299.95 
400 Lang, card opt. $49.95 




ATARI 



Qz. commodore 

5 K Personal Computer lflv^cU 
(Expands to 32K) Works with any TV! 

Retail .$300.00 Your SPECIAL Cosr. $259.95 
FREE with purch of VIC 20 one $49.50 LCD Pen Watch! 
Commodore Datasette Recorder 
for VIC 20 Your Cost:$68.95 We carry all peripherals, 
software & access. for the VIC-20 (we will beat any price!) 



Reo,i. S225.00 Progjammable 

Color TV Game 

Your Cost' 

$13095 

-Atari's dame cartridge 

Pac-man $27.95 



Epson 

X PRINTERS 

Your Con 

MX70 $299.95 

MXSOwithgraftrax 499.95 
MXB0FT " " 599.00 
MX10Q 749.00 

Gfjphtrax chip 95.00 



MrTTCL 
(ELrECTROniCa' 
IrVtElUViStON 



$ 



.95 



229 

Retail $325.00 
animated TV game! 



I D S Prism Printers- 

& Software for Apple Computers* 
*ca!l for our LOW, LOW prices! Your 
Immediate delivery- Retail Cost 
132 column (color) 1995.00 1795.00 
80 column (B&W) 1196.00 999.00 



LsedeX High Quality Monitors 



Model Description Retail Cost' 

100 12"B/W, 12 MHz 180.00149.00 

300 G 12" Green, 18 MHz 269.00 199.00 

Color I 13" Color, NTSC comp. irtput.audio amp & spkr 499.00 359.00 



Color II 13" Color,RGB input,hi res graphics, spkr 
Color HI 13" Color, RGB 240 line resolution 



1295.00 799.00 
699.00 459.00 
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APPLE FEATURE 



Apple Disk Sector Map Utility 



by Clyde Camp 



This machine-language program 
produces a display that shows 
which physical sectors on a disk 
are actually used by the Apple's 
lo-res graphics capability. 

DISKMAP 

requires: 

Apple II or Apple II Plus 
with DOS 3.3 



It is rarely necessary to know where on 
a disk data and programs are physically 
located. In fact, keeping track of all of 
the allocation details is one of the ma- 
jor reasons for having a Disk Operating 
System (DOS) in the first place. Most 
users don't want or need to know ac- 
tual sector allocation because it ob- 
structs more important functions such 
as program development and debugging. 

There are times, however, when 
that knowledge is useful. For instance, 
you may need this information when a 
disk has been in use for a while and the 
programs are scattered in random sec- 
tors rather than in contiguous sectors. 
This happens as programs are deleted or 
saved and the disk management rou- 
tines split up programs according to 
their own internal sector allocation 
algorithms. This program will display 
graphically just how broken up the sec- 
tor allocations really are. In severe 
cases, program load/ save time and data 
access time in random files can 
deteriorate significantly. At this point 
you're better off to stop and transfer 
your programs to a new disk using FID 
or a simple LOAD/SAVE. This will 
concatenate your programs onto con- 
tiguous sectors and decrease your ac- 
cess times accordingly. 

Configuration 

The program was written for a 48K 
Apple II Plus or Apple II with the Apple- 
soft ROM card, but should work on any 
system with 48K using DOS 3.3. If you 



have an assembler (I used the S-C 
Assembler Version 4.0), the program is 
easily relocated by altering the .TA and 
.OR pseudo-ops. I strongly recommend 
you acquire an assembler (if you do not 
have one) if you need to relocate this 
program. The program is far too com- 
plex to relocate manually. 

Installation 

Assuming you have one of the 
above system configurations, the pro- 
gram should be installed as follows: 

1. Boot up your system to get DOS 
installed, 

2. Enter the MONITOR (CALL - 151) 
and key in the hex data per listing 1. 
Do not begin at address $9900 as the 
listing shows; this could zap DOS. 
Instead, begin at location $900. 

3. After keying in the data, carefully 
check it using the MONITOR hex 
or symbolic dump routines (see 
Chapter 3 in the Apple II Reference 
Manual). 

4. Save the program on disk by: 
BSAVE DISKMAP,A$900,L$320 

5. Convert the disk to a master disk 
using the DOS MASTER CREATE 
utility. The program will not oper- 
ate with a slave diskette. 

6. Return to BASIC by typing FP (or 
INT) and initialize a scratch disk 
using a null (non-existent) HELLO 
program. Save the DISKMAP pro- 
gram on the scratch disk as well, 
using the procedure in step 4. Use 
this scratch disk in all the follow- 
ing steps; if you have made a mis- 
take you will not zap a good disk. 

7. Run the program by: 
BRUN DISKMAP,A$9900 

8. If all goes well, you should get the 
blinking BASIC cursor back after a 



moment. If you do not get the cur- 
sor and/ or strange things start hap- 
pening to the screen or disk, turn 
the system off, insert the DOS 3.3 
master disk, and reboot the system 
from scratch. Then BLOAD DISK- 
MAP, re-enter the MONITOR, and 
look for the erroneous data entry. 

9. Assuming that all goes well and 
Applesoft's "}" or Integer's ">" 
prompt reappears, proceed as 
follows. 

10. With the scratch disk still in the 
drive, type "&" followed by a car- 
riage return. At this point you 
should get a split lo-res screen full 
of garbage with text on the four 
lines as shown in figure 1 . 

11. Now try out the modes of operation 
described in the Operation section 
of this article. After "C", you 
should get figure 1. After a "1", 
you should get figure 2. An "E" 
command should exit the program 
with the disk map intact and with 
the BASIC cursor at the bottom of 
the screen. Now "DELETE 
HELLO" and "SAVE HELLO". 

12. Re-enter the utility via "&" and 
type "2". The result should be 
figure 3. 



If everything is still operating cor- 
rectly, quit the program by typing 
in "Q". The screen should clear 
and you should re-enter Applesoft 
or Integer BASIC. 



13. Save the program on the scratch 
disk by: 

BSAVE DISKMAP,A$9900,L$320 



14. Catalog the disk to make sure all is 
OK, then save the program on your 
permanent disk in a similar way. 
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from SubLOGIC . 

quality software 
for your Apple II. 



- - — — E T - ■ •^-■■^ L 

/URN 2 RATE + HE«11?NG VERMEL. 



A2-FS1 

FLIGHT SIMULATOR 

Combines superior flight simulation with the best « 
animated 3D graphics available. Practice take-offs and 
landing, other aerial maneuvers, declare war on the 
enemy. 16K cassette, $25.00. 32K disk, $33.50. 



A2-PB1 

KINBALL - The ultimate arcade simulation 
program, an exciting pinball game with the ball and 
flipper precision to make increased skill pay off. 
Includes 10 different play modes and 100 user- 
adjustable modes. 48K disk, $29.95. 



I I 11.1 

1 I i 

£ U JL 



8e SS* 1 i# '1 

. 1. 1 1 II I HIS III; 11 



A2-SG1 

ESCAPEi - The simple game of captive 
pursuit/A gem for game purists ... A classic for your 
game collection. 48K disk, $29.95. 



See them today 
at your dealer .. . 



or for direct orders add $1 .50 and specify UPS or first class 
mail. Illinois residents add 5% sales tax. VISA and 
MasterCard accepted. Descriptive brochures of most 
products listed here are available on request 

"Apple" is the registered trademark of Apple Computer Inc. 
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Communications Corp. 
713 Edgebrook Drive 
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(217) 359-8482 
Telex: 206995 
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Figure 1 



BINARY SECTOR 
COUNTER 



Note: Boxes in 
these figures are 
for clarity only. 




HEX 00000000000000001 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 222 
TRK0123456789ABCDEF0123456789ABCDEF012 
BLACK = USED SHADED = FREE 
MODE = 1,2,C,E,Q?C 



Figure 2 



DOS (TRACKS 0-2) 



VTOC & CATALOG - 
(TRACK $11) 




HELLO PROGRAM 
■ (TRACK $12, 
SECTORS F.E) 



DISKMAP PROGRAM 



HEX 00000000000000001 1 11 1 1 1 1 1 1 1 1 1 1 1 1 222 
TRK0123456789ABCDEF0123456789ABCDEF012 
BLACK = USED SHADED = FREE 
MODE = 1,2,C,E.Q? 1 



Figure 3 



DELETED HELLO 
PROGRAM 




HEX 00000000000000001 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 222 
TRK0123456789ABCDEF0123456789ABCDEF012 
BLACK = USED SHADED = FREE 
MODE = 1 1 2,C,E,G?2 



Operation 

Once the program is debugged per 
the previous procedure (designed to 
minimize trauma caused by clobbered 
disks), operation is very easy. 

After the program is initialized by 
BRUN DISKMAP, it is entered by use 
of the Applesoft "&" command, either 
from inside a program or from the 
keyboard. Once this is done the follow- 
ing commands are recognized by the 
DISKMAP program. Refer to figure 2 for 
clarification. 

1 - Read the disk and place its map into 

the MAP #1 position. 

2 - Read the disk and place its map into 

the MAP #2 position. 

C -Clear and initialize the graphics 
screen. 

E - End the program and return to the 
calling program without clearing 
the graphics display. 

Q -Quit the program and return to the 
calling program full text mode. 

The program, hidden between DOS 
and its buffers, is unaffected by 
FP,INT,NEW,CLEAR,HIMEN,LOMEM, 
or any other user or program action 
short of rebooting the system via PR#6 
or its equivalent. 



How the Piogram Works 

The program is broken into two ma- 
jor sections. The first is a setup routine 
which is executed once when the pro- 
gram is BRUN the first time. This rou- 
tine (ENTRY) performs three functions: 

1. "POKEs" in a fake HIMEM 
(lines 1860-1890) 

2. "POKEs" in the "&" JUMP vector 
(lines 1900-1950) 

3. Moves the DOS sector buffers so as 
to hide the program between the buf- 
fers and DOS itself 

(lines 1960-2000) 

After performing these tasks, the 
program exits back into whatever mode 
the Apple was in when DISKMAP was 
BRUN. 

Lines 2060-2230 define the I/O Buf- 
fer (IOB) and Device Characteristics 
Table (DCT) required by the RWTS 
routine which is accessed in the pro- 
gram by GETVTC in lines 2240-2270. 
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The second part of the program is 
the section that is executed when the 
"&" Applesoft command in en- 
countered. It is composed of a primary 
control loop routine (START) and three 
major subroutines (CODE, MAP, and 
NEWTRK). The operation of each of 
these will be discussed in the following 
paragraphs. 

All program references refer to 
listing 1 (a working knowledge of 6502 
machine language is assumed). This 
particular assembler utilizes 7SYM' to 
denote the most significant byte of the 
16-bit word 'SYM' and '#SYM' for the 
least significant byte. 

Main Control Loop (START) 

This routine begins by stuffing the 
value $3CF onto the top of the stack. 
This step will be interpreted by the RTS 
in line 2730 as a return to location 
$3D0, which is the DOS warm start 
vector. 

Lines 2520-2600 then set the screen 
to the mixed lo-res mode, set normal 
video, and position the cursor at text 
screen line 20 in preparation for the 
text message. 

The main control loop begins at 
START2 by clearing the text screen and 
printing the text message. Then it 
waits for a keystroke input using the 
BASIC KEYIN routine. After line 2640 
saves the key pressed as part of the text 
message, lines 2650-2730 test for and 
execute the 'E' and 'Q' commands 
which terminate the Disk Mapper and 
return to the calling program via the 
RTS at line 2730. 

Lines 2740-2780 test for and ex- 
ecute the 'C command by clearing the 
graphics screen and re-plotting the 
black and white binary code sector 
reference for the two maps. 

Lines 2790-2890 test for the '1' or 
'2' commands and store the appropriate 
vertical offset into MAPNO for use by 
the plotting routines. Invalid command 
keys are detected by line 2860. 

Lines 2900-2920 then call sub- 
routines to get the VTOC from the 
disk, plot its configuration in the 
appropriate map location, and loop 
back for the next command. 

Binary Code Plotter (CODE) 

This subroutine is called by the 'C 
command after the graphics screen is 
cleared by line 2760 and plots a binary 
sector counter on the left side of the 



Listing 1 



FDED- 
FDFO- 
FB5B- 
FDOC- 
FB64- 
FBOO- 
FB36- 
FC5B- 
9D00- 



0008- 
0006- 
0019- 
00 1 A- 
00 1 B- 
00 1 C- 
00 1 D- 
00 1E- 
OOIF- 
0073- 
0074- 
0032- 
0022- 



03DO- 
03D3- 
03D9- 
03F5- 
03F6- 
03F7- 



004C- 
OOOD- 
0004- 
0023- 
OOOF- 
OOOO- 
0027- 

0014- 
0018- 
0003- 
0008- 
OOOA- 
OOOF- 
0008- 
OOOO- 
0038- 
0004- 
OOOO- 
0014- 
0008- 
OOOA- 



1000 

1004 

1005 

1007 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1475 

1480 

1490 

1500 

1510 

1520 



DISK MAPPER 

CLYDE R. CAMP 

01/01/82 



GLOBAL AND LOCAL EQUATES 



BASIC ROM ROUTINES 



COUT .EQ *FDED PRINT ACC 

CDUT1 .EQ *FDFO PRINT ASCII 

TABV .EQ *FB5B VERTICAL TAB ROUTINE 

KEYIN .EQ *FDOC KEYBOARD INPUT ROUTINE 

SETCOL .EQ *F864 COLOR=ACC 

PLOT .EQ *FBOO LO-RES PLOTTING ROUTINE 

CLRTOP .EQ *F836 CLEAR GR SCREEN 

HOME .EQ 4FC58 CLEAR TEXT SCREEN 

DOSBUF .EQ *9D00 ADDRESS OF 1ST DOS BUFFER ADDRESS 



* 
* 
* 
* 

TBM 

MESADD 

TRK 

MAPNO 

OFFSET 

VERPOS 

HORPOS 

TEMP2 

TEMP 

HIMEML 

HIMEMH 

INVFLG 

WNDTOP 



PAGE ZERO VARIABLES 



.EQ $08 
.EQ *06 
.EQ *19 
-EQ *1A 
.EQ «1B 
.EQ *IC 
.EQ $1D 
.EQ $1E 
.EQ *1F 
.EQ *73 
.EQ *74 
.EQ *32 
. EQ *22 



TRACK BIT MAP FOR TRACK N 

MESSAGE ADDRESS STORAGE 

TRACK COUNTER 

MAP NO. 1 OR 2 

OFFSET IN VTOC 

VERTICAL POSITION FOR PLOTTING 

HORIZONTAL POSITION FOR PLOTTING 



ADDRESS CONTAINING HI MEM POINTER 

INVERSE VIDEO FLAG ADDRESS 

ADDRESS CONTAINING TEXT TOP LINE NO. 



* 

* 

WRMDOS 

CLDDOS 

RWTS 

AMPER 

AMPERL 

AMPERH 



PAGE 3 VECTORS 



,EQ *3D0 
EQ »3D3 

, EQ *3D9 
EQ *3F5 
EQ *3F6 
EQ *3F7 



LOCATION OF DOS COLD START VECTOR 

LOCATION OF DOS RWTS VECTOR 

> 

) & LOCATIONS 



1530 * 

1540 * 
1550 * 
1560 * 

1570 * 

1580 JMP 
1590 CR 
1600 INITH 
1610 NOTRK 
1620 NOSEC 
1630 ZERO 
1640 INITV 



GENERAL EQUATES 



.EQ *4C HEX OPCODE FOR 'JMP' INSTRUCTION 

.EQ *0D ASCII CODE FOR CARRIAGE RETURN 

■EQ 4 INITIAL HORIZONTAL POSITION 

.EQ 35 NUMBER OF TRACKS 

.EQ 15 NUMBER OF SECTORS -1 FOR DOS 3.3 

-EQ O THE VALUE ZERO 

-EQ 39 INITIAL VERT. POSITION 
(MAP #1 /SECTOR O) 



1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1B40 
1850 



TOP OF SPLIT SCREEN TEXT WINDOW 
BOTTOM OF SCREEN TEXT 
tt BITS/NIBBLE-1 
# BITS/BYTE 



SCREEN COLOR EQUATES 



SCTOP 

WNDBOT 

NOB IT 

NOLOOP 

GRAY 

WHITE 

BROWN 

BLACK 

TBMST 

TBM INC 

M1L0C 

M2L0C 

USED 

UNUSED 

* 

* INITIALIZATION ROUTINE TO HIDE PROGRAM BETWEEN 

* DOS AND DOS-BUFFERS AND TO SET UP AMPERSAND 

* (&) JUMP VECTOR 



.EQ 20 
.EQ 24 
.EQ 3 
.EQ 8 
.EQ 10 
.EQ 15 
.EQ 8 
.EQ O 
.EQ 56 
.EQ 4 
.EQ O 
.EQ 20 
.EQ BROWN 
.EQ GRAY 



START OF TBM IN VTOC 

INC. AMOUNT FOR SCANNING THROUGH VTOC 

VERTICAL OFFSET FROM INITV FOR MAP #1 

VERTICAL DFFSET FROM INITV FOR MAP #2 

COLOR FOR USED SECTORS 

COLDR FOR UNUSED SECTORS 



.OR *9900 
.TA *SOO 



(Continued) 
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Listing 1 (Continued) 




99 00 _ A 9 oO 1860 ENTRY 


LDA #ENTRY > 


9902- 85 73 1870 


ST A HIMEML > POINT HI MEM TO ENTRY POINT 


9904- A9 99 18SO 


LDA /ENTRY ) 


9906- 85 74 1S90 


ST A HIMEMH > ! 


9908- A9 DA 1900 


LDA #START > 


990A- 8D F6 03 1910 


ST A AMPERL > SET UP AMPERSAND JUMP TO 'START' 


990D- A9 9 A 1920 


LDA /START > 


990F- 8D F7 03 1930 


STA AMPERH > 


9912- A9 4C 1940 


LDA #JMP > ! 


9914- 8D F5 03 1950 


STA AMPER > 


9917- A9 00 1960 


LDA #ENTRY ) 


9919- 8D 00 9D 1970 


STA DOSBUF > MOVE DOS BUFFERS TO PROTECT PROGRAM 


99 1C- A9 98 1980 


LDA /ENTRY- 1 > 


991E- 8D 01 9D 1990 


STA DOSBUF+1 > 


9921- 4C D3 03 2000 


JMP CLDDOS > COLD START DOS ! 


2010 * 




2020 * 




2030 * 


DOS BUFFER, I OB, DCB, AND CALLING ROUTINE 


2040 t 




205O * - 




9924- 2060 BUF 


.B5 256 SECTOR STORAGE BUFFER 


9A24- 01 2070 I OB 


.DA #*01 I OB TYPE 


9A25- 60 2080 1BSL0T 


.DA #»60 DISK SLOT 


9A26- 01 2090 IBDRVN 


.DA tt*01 DISK DRIVE 


9A27- 00 2100 


.DA #*00 VOLUME 


9A28- 11 2110 


.DA **11 TRACK NUMBER 


9A29- 00 2120 


.DA #*00 SECTOR NUMBER 


9A2A- 35 9A 2130 


.DA DCT DCT ADDRESS . 


9A2C- 24 99 2140 


.DA BUF BUFFER ADDRESS 


9A2E- OO 00 2 ISO 


.DA $00 NOT USED 


9A30- 01 2160 


.DA #*01 READ CODE 


9A31- OO 2170 


.DA #*00 ERROR CODE 


9A32- FE 2 ISO 


.DA #*FE VOLUME NUMBER i 


9A33- 60 2190 IOBPSN 


.DA #*60 SLOT NUMBER 


9A34- Ol 2200 IOBPDIM 


.DA #*01 DRIVE NUMBER 


9A35- OO 2210 DCT 


.DA #*00 DEVICE TYPE CODE 


9A36- Ol 2220 


.DA #*01 PHASES/TRACK 


9A37- EF D8 2230 


.DA *D8EF TIME COUNT 


9A39- A9 9A 2240 GETVTC 


LDA /IOB ) 


9A3B- AO 24 2250 


LDY #IOB ) ROUTINE TO READ TRK/SEC 




DEFINED BY IOB 


9A3D- 20 D9 03 2260 


JSR RWTS ) 


9A40- 60 2270 


RTS 


2280 * 




2290 * 




2300 * 


THE FOLLOWING IS THE 


2310 * 


TEXT MESSAGE FOR THE PROGRAM 


2320 * 




2330 * 


".AS -" SETS THE HIGH ORDER BIT IN THE 


2340 * 


ASCII BYTE 


2350 * 




2360 * 




9A41- C8 C5 D8 




9A44- AO BO BO 




9A47- BO BO BO 




9A4A- BO BO BO 




9A4D- BO BO BO 




9A50- BO BO BO 




9A53- BO BO Bl 




9A56- Bl Bl Bl 




9A59- Bl Bl Bl 




9A5C- Bl Bl Bl 




9A5F- Bl Bl Bl 




9A62- Bl Bl Bl 




9A65- B2 B2 B2 2370 Ml 


.AS -"HEX 00000000000000001111111111111111222" 


9A68- AO D4 D2 




9A6B- CB AO BO 




9A6E- Bl B2 B3 




9A71- B4 B5 B6 




9A74- B7 B8 B9 




9A77- CI C2 C3 




9A7A- C4 C5 C6 




9A7D- BO Bl B2 




9AB0- B3 B4 B5 




9A83- B6 B7 B8 




9A86- B9 CI C2 




9A89- C3 C4 C5 




9A8C- C6 BO Bl 




9A8F- B2 2380 


.AS -" TRK 0123456789ABCDEF0123456789ABCDEF012" 


9A90- AO C4 CI 




9A93- D2 CB AO 




9A96- AS C2 D2 




9A99- CF D7 CE 




9A9C- A9 AO BD 




9A9F- AO D5 D3 




9AA2- C5 C4 AO 




9AA5- AO CC C9 




9AA8- C7 CB D4 




9AAB- AO AS C7 




9AAE- D2 CI D9 




9AB1- A9 AO BD 




9AB4- AO C6 D2 




9AB7- C5 C5 2390 


.AS -" DARK < BROWN > - USED LIGHT (GRAY) = FREE" 

(Continued) 



■H APPLE FEATURE | 

screen in two locations (one for each 
disk map). It uses black for binary '0' 
and white for binary '1'. This is 
necessary as the lo-res graphics screen 
cannot have text imbedded in the graph- 
ics portion. The graphical representa- 
tion of a 4-bit counter is useful for lo- 
cating a specific sector within the map. 

The 'CODE' routine consists of two 
nested loops which are executed twice 
with different values of MAPNO (once 
for each map position). The outer loop 
is executed 16 times as it counts from 
15 down to zero, representing the 16 
sectors within a track. The inner loop 
is executed four times for each sector 
count as it plots black or white for each 
bit in the nibble representing the sector 
count. 

Mapping Routine (MAP) 

This routine, the heart of the pro- 
gram, reads each word in the Track Bit 
Map portion of the VTOC saved at BUF. 
It then plots each word as a vertical 
track using the NEWTRK subroutine. 

Lines 3390-3460 initialize the 
parameters necessary to plot the ap- 
propriate map. The TBM consists of 
140 bytes beginning at byte TBMST of 
the VTOC. These are arranged in 
blocks of four bytes per track with 

BYTE #1 = status of tracks 15-8 
( 1 = free = used) 

BYTE #1 = status of tracks 7-0 
( 1 = free = used) 

BYTE #3 = unused (all zero) 

BYTE #4 = unused (all zero) 

Lines 3470-3520 get the first two 
bytes for the appropriate track and save 
them in variable locations TBM and 
TBM + 1 for use by the NEWTRK rou- 
tine which is then called by line 3530. 

After NEWTRK plots the status of 
the given track, lines 3540-3640 
calculate the next track, re-initialize 
the necessary parameters, and loop if 
there are more sectors to do. Other- 
wise, line 3640 returns to the START 
routine for the next command. 

Track Plotting Routine (NEWTRK) 

This routine plots the status of a 
single track based on the data passed to 
TBM and TBM + 1 . It consists of two 
pieces of inline code, identical except 
for whether or not they access TBM or 
TBM+1 as the data source. Lines 
3740-3890 are for sectors 0-7 (TBM + 1) 
and lines 3900-4050 are for sectors 8-15 
(TBM). 
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Line 3740 sets up the 'X' register as 
the loop counter for 8 bits in the byte. 
Lines 3750-3760 set the plotting color 
to the 'UNUSED' color. This is done by 
use of the BASIC SETCOL routine 
which expects to see the desired color 
in the 'A' register. 

Next, the 'Y' register is loaded with 
the horizontal position for this track 
(HORPOS) and lines 3780-3800 test the 
next bit in TBM + 1 to determine its 
value. If the bit is a '1' (unused) then 
the routine continues, otherwise lines 
3810-3820 switch the color to 'USED' 
prior to continuing. 

Lines 3830-3850 then calculate the 
desired vertical position based on the 
map (1 or 2) and the sector. Line 3860 
then calls the BASIC PLOT routine 
which plots one lo-res point with the 
color last set by SETCOL at the 
horizontal location in 'Y', and the ver- 
tical position in 'A'. This routine 
destroys the 'A' data but does not 
disturb 'X' or 'Y\ 

Lines 3870-3890 alter the vertical 
position to the next sector and test to 
see if all bits in the byte (TBM + 1) have 
been plotted. If so, line 3890 falls 
through to an identical routine for TBM. 



Program Modifications 

Of the several modifications that 
could be made to the program, the most 
likely would be to access another disk 
drive or slot. This can be done by 
changing the disk slot number at 
IBSLOT and IBDRVN. The values for 
IBDRVN are $01 or $02 and the values 
for IBSLOT are $n0 where n is the slot 
number that the disk interface card is 
plugged into. The locations IOBPSN 
and IOBPDN should also be changed to 
match IBSLOT and IBDRVN respec- 
tively. All of these locations are in the 
IOB (lines 2080-2200). 



The program will also work with 
DOS 3.2, provided that NOSEC (lines 
1620 and 3020) is changed from 15 
($0F) to 12 ($0C) and NOLOOP (line 
3740 only) is changed from 8 to 5. 



The colors chosen for 'USED' and 
'UNUSED' were selected to be visually 
acceptable on both color and black- 
white monitors. Any other colors may 
be used, depending on personal prefer- 
ence, by changing lines 1770, 1780, 
3750, 3810, 3910, and 3970. A word of 
caution: What looks good in color does 
not necessarily look good in black and 
white due to the Apple's hardware. 



Listing 1 (Continued) 












9AB9- 


AO AO AO 












9ABC- 


AO AO AO 












9ABF- 


AO AO AO 












9AC2- 


AO AO AO 












9AC5- 


CD CF C4 












9AC8- 


C5 AO BD 












9ACB- 


AO Bl AC 












9ACE- 


B2 AC C3 












9AD1- 


AC C5 AC 












9AD4- 


Dl AO BF 












9AD7- 


AO 2400 




.AS 


-" 


MODE = 1,2„C,E,Q ? " 




9AD8- 


AO 2410 


LSTKEY .DA 


#*A0 


LAST KEY COMMAND (PART OF TEXT MESSAGE) 




9AD9- 


OD 2420 
2430 
2440 


* 

* 


.DA 


#13 


HEX C.R. (END OF TEXT MESSAGE) 






2450 


* 


ENTRY 


OF PROGRAM FOLLOWING "&'■ 






2460 


* 












2470 


t 










9ADA- 


A9 03 2480 


START 


LDA 


/WRMDOS- 


-1 




9ADC- 


48 2490 




PHA 




) FAKE A RETURN TO DOS WARM START 




9ADD- 


A9 CF 2500 




LDA 


#WRMDOS- 


-1 BY PUSHING *03CF ON TOP OF STACK 




9ADF- 


48 25 lO 




PHA 




) 




9AE0- 


AE 53 CO 2520 




LDX 


*C053 


SET MIXED TEXT /GRAPHICS 




9AE3- 


AE SO CO 2530 




LDX 


*C050 


SET GRAPHICS MODE 




9AE6- 


AE 56 CO 2540 




LDX 


*C056 


SET LO RESOLUTION 




9AE9- 


A2 FF 2550 




LDX 


#*FF 






9AEB- 


86 32 2560 




STX 


INVFL6 


SET NORMAL VIDEO 




9AED- 


A2 14 2570 




LDX 


#SCTOP 






9AEF- 


86 22 2580 




STX 


WNDTDP 


SET TEXT WINDOW TOP TO LINE 20 




9AF1- 


A9 18 2590 




LDA 


#WNDBOT 






9AF3- 


20 SB FB 2600 




JSR 


TABV 


VTAB TO LINE 23 




9AF6- 


20 58 FC 2610 


START2 JER 


HOME 


CLEAR TEXT 




9AF9- 


20 lO 9C 2620 




JSR 


MM1 


PRINT MESSAGE 




9AFC- 


20 OC FD 2630 




JSR 


KEY IN 


GET A COMMAND 




9AFF- 


8D D8 9A 2640 




STA 


LSTKEY 


SAVE COMMAND IN MESSAGE 




9B02- 


C9 C5 2650 




CMP 


#*C5 


WAS IT *E>? 




9B04- 


FO OB 2660 




BED 


END 


IF *E* THEN END WITHOUT CLEARING SCREEN 




9B06- 


C9 Dl 2670 




CMP 


#«D1 


WAS COMMAND A *Q' ? 




9B08- 


DO OB 2680 




BNE 


NOTQ 


IF NOT KEEP LOOKING 




9B0A- 


AE 51 CO 2690 




LDX 


*C051 


IF SO SET TEXT MODE 




9B0D- 


A2 00 2700 




LDX 


#M1L0C 


GET VERTICAL OFFSET FOR MAP #1 




9B0F- 


86 22 2710 




STX 


WNDTOP 






9B11- 


20 58 FC 2720 


END 


JSR 


HOME 


CLEAR SCREEN TEXT 




9B14- 


60 2730 




RTS 




RETURN TO CALLING PROG. VIA FAKE RETURN 




9B15- 


C9 C3 2740 


NOTQ 


CMP 


#*C3 


WAS COMMAND A *C* 




9B17- 


DO 09 2750 




BNE 


NOTC 


IF NOT KEEP LOOKING 




9B19- 


20 36 FB 2760 




JSR 


CLRTOP 


OTHERWISE CLEAR GRAPHICS SCREEN 




9B1C- 


20 44 9B 2770 




JSR 


CODE 


DISPLAY BINARY CODE FOR SECTOR REFERENCE 




9B1F- 


4C F6 9A 2780 




JMP 


START2 


AND LOOP TO NEW COMMAND 




9B22- 


C9 Bl 2790 


NOTC 


CMP 


#*B1 


WAS IT A '1* (FOR MAP #1) 




9B24- 


DO 05 2800 




BNE 


N0T1 


IF NOT KEEP LOOKING 




9B26- 


A2 OO 281 O 




LDX 


#M1L0C 


VERTICAL OFFSET FOR MAP #1 




9B28- 


4C 36 9B 2820 




JMP 


VTOC2 


AND GO GET THE TRACK MAP , 




9B2B- 


A2 AO 2830 


N0T1 


LDX 


#*A0 


PUT A ASCII BLANK IN X 




9B2D- 


C9 B2 2840 




CMP 


#*B2 


WAS IT A '2' 




9B2F- 


8E D8 9A 2850 




STX 


LSTKEY 


STORE A BLANK FOR LAST KEY 




9B32- 


DO C2 2860 




BNE 


START2 


IF NOT THEN BAD COMMAND SO LOOP 




9B34- 


A2 14 2870 




LDX 


#M2L0C 


GET VERTICAL OFFSET FOR MAP #2 




9B36- 


86 1 A 2880 


VT0C2 


STX 


MAPNO 


SAVE VERTICAL OFFSET AS MAP NUMBER 




9B38- 


8D D8 9A 2890 




STA 


LSTKEY 


STORE VALID KEY AS PART OF MESSAGE 




9B3B- 


20 39 9A 2900 


VTOC 


JSR 


6ETVTC 


GET VOLUME TABLE OF CONTENTS FROM DISK 




9B3E- 


20 80 9B 2910 




JSR 


MAP 


GO PLOT THE MAP BASED ON VTOC DATA 




9B41- 


4C F6 9A 2920 
2930 
2940 


j 


JMP 


START2 


AND LOOP FOR NEW COMMAND ! 






* 












2950 


* 


ROUTINE TO PUT BINARY COUNTER ON LEFT 






2960 


* 


SIDE OF SCREEN FOR MAP SECTOR REFERENCE 






2970 


* 












2980 


* 












2990 


CODE 










9B44- 


A2 00 3000 




LDX 


#M1L0C 


SET UP OFFSET FOR MAP #1 




9B46- 


86 1A 3010 




STX 


MAPNO 


AND SET MAP # 




9B48- 


A2 OF 3020 


C0DE2 


LDX 


#NOSEC 


16 SECTORS FOR DOS Z.3 (13 FOR DOS 3.2) 




9B4A- 


86 IF 3030 


NXTNIB 


STX 


TEMP 


STORE SECTOR COUNT IN TEMP 




9B4C- 


AO 03 3040 




LDY 


#NOBIT 


COUNTER FOR BITS IN HEX NIBBLE (O-F) 




9B4E- 


86 IE 3050 




STX 


TEMP2 


SAVE AS BIT COUNTER 




9B50- 


A9 00 3060 


NXTBIT 


LDA 


#BLACK 


SETUP FOR BIT=0 




9B52- 


20 64 F8 3070 




JSR 


SETCOL 


SET COLOR TO BLACK 




9BS5- 


18 3080 




CLC 




GET RID OF CARRY IF ANY 




9B56- 


66 IF 3090 




ROR 


TEMP 


ROTATE TO NEXT BIN IN COUNTER 




9B5B- 


90 05 3100 




BCC 


BLK 


JUMP IF BIT IS ZERO 




9B5A- 


A9 OF 31 lO 




LDA 


#WHITE 


IF NOT A ZERO IT MUST BE ONE SO... 




9B5C- 


20 64 F8 3120 




JSR 


SETCOL 


SET COLOR TO WHITE , 




9B5F- 


A9 27 3130 


BLK 


LDA 


ttlNITV 


A = BOTTOM OF GRAPHICS SCREEN 




9B61- 


18 3140 




CLC 




CLEAR CARRY 




9B62- 


E5 IE 3150 




SBC 


TEMP2 


SUBTRACT THE SECTOR COUNT 




9B64- 


E5 1A 3160 




SBC 


MAPNO 


SUBTRACT OFF MAP # BIAS 




9B66- 


20 00 FB 3170 




JSR 


PLOT 


PLOT THE BIT (1=WHITE 0=BLACK) 




9B69- 


88 3180 




DEY 




DECREMENT BIT COUNTER FOR NIBBLE 




9B6A- 


10 E4 3190 




BPL 


NXTBIT 


LOOP TO NEXT BIT OF NIBBLE 




9B6C- 


CA 3200 




DEX 




DECREMENT THE SECTOR COUNTER 




9B6D- 


10 DB 3210 




BPL 


NXTNIB 


LOOP FOUR TIMES THROUGH NIBBLE (HEX *F'J 




9B6F- 


A9 14 322Q 




LDA 


#M2L0C 


VERTICAL BIAS FOR MAP #2 

(Continued) | 
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Listing ^(Continued) 



9B71- C5 1A 
9B73- FO 05 
9B75- 85 1A 
9B77- AC 48 
9B7A- A9 OO 
9B7C- 85 1 A 
9B7E- 60 
9B7F- 60 



A9 OO 
9BB2- 85 19 
9B84- A9 3B 

9B86- 85 IB 
9B88- A9 27 
9BSA- 85 1C 
9B8C- A9 04 
9B8E- 85 ID 
9B90- A4 IB 
9B92- B9 24 99 3480 

9B95- 85 08 3490 
9B97- C8 3500 
9B98- B9 24 99 3510 

9B9B- 85 09 3520 
9B9D- 20 B5 9B 3530 
9BAO- A9 27 3540 



3230 

3240 

3250 

9B 3260 

3270 BOON2 
3280 
3290 
3300 

33 lO * 

3320 * 
3330 * 
3340 * 
3350 * 
3360 * 

3370 * 

3380 MAP 
3390 
3400 
3410 

3420 
3430 
3440 
3450 
3460 
3470 LDDP1 



CMP MAPNO DID I JU8T DO MAP #2? 

BEQ BD0N2 IF SECOND TIME THROUBH THEN QUIT 

STA MAPNO ELSE PUT IT IN MAPNO 

JMP C0DE2 AND GO DO IT AGAIN FOR MAP #2 

LDA #M1L0C VERTICAL BIAS FOR MAP #1 

STA MAPNO SAVE IN MAPNO 

RTS RETURN 

RTS NOT USED (SPARE BYTE) 



ROUTINE TO PLOT A 16 SECTOR BY 35 TRACK 
MAP AT ONE OF TWO VERTICAL LOCATIONS 
DEFINED BY < INITV-MAPND) 



LDA #ZERO 
STA TRK 
LDA #TBMST 



STA 
LDA 
STA 
LDA 
STA 
LDY 
LDA 



OFFSET 
#INITV 
VERPOS 
#INITH 
HORPOS 
OFFSET 
BUF,Y 



STA TBM 

I NY 

LDA BUF,Y 

STA TBM+1 
JSR NEWTRK 
LDA #INITV 



9BA2- 
9BA4- 
9BA6- 
9BAB- 
9BAA- 
9BAC- 
9BAE- 
9BBO- 



85 1C 
E6 19 
E6 ID 
A5 IB 
69 04 
B5 IB 
A5 19 
C9 23 



9BB2- DO DC 
9BB4- 60 



9BB5- A2 08 
9BB7- EO 05 
9BB9- DO 06 
9BBB- 66 09 
9BBD- 66 09 



3550 
3560 
3570 
3580 
3590 
3600 
3610 
3620 
3630 
3640 
3650 *- 
3660 * 
3670 * 
3680 * 
3690 * 
3700 * 
3710 * 

3720 * 

3730 NEWTRK 

3740 

3742 

3743 

3744 

3745 



STA 
INC 
INC 
LDA 
ADC 
STA 
LDA 
CMP 
BNE 
RTS 



VERPOS 

TRK 

HORPOS 

OFFSET 

#TBMINC 

OFFSET 

TRK 

#NOTRK 

LOOP1 



INITIALIZE TRACK COUNTER TO ZERO 

OFFSET = START OF TRACK BIT 
MAP IN VTOC 

INITIALIZE VERTICAL POSITION 

INITIALIZE HORIZONTAL POSITION 

GET TBM OFFSET 
GET 1ST BYTE OF BIT MAP FOR 
THIS TRACK 
SAVE VALUE IN TBM 
BUMP INDEX TO NEXT BYTE 
GET 2ND BYTE OF BIT MAP FOR 
THIS TRACK 
SAVE SECOND BYTE 

GO PLOT SECTOR STATUS FOR THIS TRACK 
RE-INIT. VERT. POSITION FOR 
NEXT TRACK 

BUMP THE TRACK COUNTER 

BUMP HOR.POS. FOR NEXT TRACK 

CALCULATE THE NEW OFFSET IN THE VTOC 

AND SAVE IT 

GET THE TRACK TO DO NEXT 

WAS THES THE LAST TRACK? 

IF NOT THEN LOOP 



ROUTINE CALLED BY 'MAP' TO PLOT A 
CNOSEC) SECTOR TRACK AT 
VERTICAL (INI TV-MAPNO+ VERPOS ) 
HORIZONTAL ( INI TH+ (TRACK tt> > 






9BBF- 
9BC1- 
9BC3- 
9BC6- 
9BC8- 
9BC9- 
9BCB- 

9BCD- 
9BCF- 
9BD2- 
9BD4- 
9BD5- 
9BD7- 
9BDA- 

9BDC- 
9BDD- 
9BDF- 
9BE1- 
9BE3- 
9BE6- 
9BE8- 
9BE9- 
9BEB- 
9BED- 
9BEF- 
9BF2- 
9BF4- 
9BF5- 
9BF7- 
9BFA- 
9BFC- 



66 09 3746 

A9 OA 3750 NEWBIT 

20 64 F8 3760 

A4 ID 3770 

18 37B0 

66 09 3790 

BO OS 3800 

A9 OS 3810 
20 64 F8 3820 
■ A5 1C 3830 FREE 
18 3840 
E5 1A 3850 
20 00 F8 3860 
C6 1C 3870 



LDX ttNOLOOP 
CPX #5 
BNE NEWBIT 
ROR TBM+1 
ROR TBM+1 

ROR TBM+1 

LDA #UNUSED 

JSR SETCOL 

LDY HORPOS 

CLC 

ROR TBM+1 

BCS FREE 

LDA #USED 

JSR SETCOL 

LDA VERPOS 

CLC 

SBC MAPNO 

JSR PLOT 

DEC VERPOS 



X = BIT/ BYTE COUNTER 

CHECK FOR 13 SECTOR (X=5) 

SKIP NEXT 3 ROFTS IF 16 SECTOR 

ONLY EXECUTED IF LINE 3740 MANUALLY 

CHANGED TO 'LDX #5' FOR 
13 SECTOR DISK 



SET GR COLDR TO 'UNUSED' COLOR 
Y = HORIZONTAL POSITION 
CLEAR THE CARRY 



MICRObits 



CA 

DO E2 
A2 08 
A9 OA 
20 64 
A4 ID 
18 

66 08 
BO 05 
A9 OS 
20 64 
A5 1C 
18 

E5 1A 
20 00 
C6 1C 
CA 



3880 DEX 

3890 BNE NEWBIT 

3900 LDX #NOLOOP 

3910 NEWBT2 LDA MJNUSED 



IF BIT IN TBM+1 IS 1 THEN 
SECT. IS FREE 



OTHERWISE SET GR COLOR TO * USED' COLOR 
NOW CALCULATE TRUE VERTICAL POSITION 



A=VERT;Y=HOR.;BO PLOT SECTOR CELL 
DOWN COUNT THE VERTICAL 
POSITION OFFSET 

KEEP GDING IF BYTE NOT FINISHED 
IF THE FIRST BYTE OF THE TBM IS DONE, 
THEN REPEAT THE ABOVE FOR 2ND BYTE 



F8 3920 

3930 

3940 

3950 

3960 

3970 
F8 3980 

3990 FREE2 

4000 

4010 
FS 4020 

4030 

4040 



JSR SETCOL 
LDY HORPOS 

ROR TBM 
BCS FREE2 
LDA #USED 
JSR SETCOL 
LDA VERPOS 
CLC 

SBC MAPNO 
JSR PLOT 
DEC VERPOS 
DEX 



(Continued) 



(Continued from page 41) 
Ream for AIM 65 

: t second, day of 
th, year. Twelve- or 
24-hour format. Pin compatible with 
■••' i (also SYM, 
mn » ' i. ' > uJ'-:Jju^b'" 
interrupts; Niead battery backup; 
indus 1 1 H>aid 4.5 x 6. All 

ICs socketed; single 5V supply; 22-page 
manual. All software included. Bare 
board $29. Complex £.P\ f .?.'-> 3 f 
includes batteries. Add $4 shipping and 
handling. California residents add 6%. 
. '"-.-. m w..vii, 

: .Carlsbad, CA 92008 ■ 
!7N] >Sm-Ur; 



OSI M:- de Tracer 

Use DEBUG to single step your 
computer and see all instructions 

■executes Adds tracing commands to ' 
•' )V:> mm\. »' ! ^c, 1 "' <,. i^r. m 
ROM also. Adds breakpoint, high and 
low trace limits. All Extended Monitor 
commai ■ ined. $12.95 tor all 6SD 

r 
DMP Systems 

m< ,v~"'f ,■:".-■ 

NY 14612 



Joystick Interface 

For PET, AIM 65, SYM, KIM or other 
6502- 1 1 <uter. Uses five VIA 

» -hit conversion of up 
to eight . : devices. Requires 64 

ware included). 
Assem'h ■ •■. -■ :. } 5 ; bare board 

- $12.95. 

Sydney S. Koegler 

er Products 
2339 Carriage Ave. 
Richland, WA 99352 



OSI Superboard II, C1P 

Tac-Man: Similar to Pac-Man, with 
ghosts, dots, power pills, cherries, and 
a great maze, plus fast/ smooth action. 
For 8 K only $9.95. Stai-Fire: Similar 

to Defender. 4K - $7.95; 8K — $9.95. 

Send $1.00 for a complete catalog. 
Cassette only. 

Swany J s OSI Software 
:■:'■ ' 2652 37th West 

Seattle, WA 98199 

(206) 282-7376 



Lessons in Algebra 

An easy and fun way to learn the basic 
elements of high school algebra. Apple 
computer diskette $29.95. 30-day 
money-back guarantee if not satisfied. 

George Earl 

1302 South General McMullen Dr. 

San Antonio, TX 78237 

(Continued on page 117) 
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APPLE FEATURE 

Conclusion 

This program provides valuable in- 
sight as to exactly where on the disk 
programs are located. This, in turn, 
allows you to speed up random access 
type programs significantly, and to 
determine when a garbage collection 
operation should be performed on often 
written-to disks. 

One additional note: DISKMAP 
assumes that the VTOC accurately 
reflects the storage status of the disk. 
This is true 99.9% of the time. There 
are cases, however, where the VTOC 
will have gotten clobbered due to one of 
the following reasons: 

• Assembly-language programs which 
directly manipulate the disk files 
without utilizing DOS. 

• Interruption of AC power during a 
disk access (static discharge can 
cause the same thing). 

• Manual manipulation of individual 
disk sectors using one of the sector 
read/write utility programs readily 
available on the market. 



Listing 1 (Continued) 










9BFD- 


DO 


E2 


4050 




BNE 


NEWBT2 




9BFF- 


hO 




4060 
4070 




RTS 




AND RETURN TO DO NEXT 
TRACK (IF ANY) 
















4080 


* 














4090 


* 


ROUTINE TO PRINT ANY ASCII STRING WHDSE 








4100 


* 


ADDRESS IS FOUND AT <MESADD+1 , MESADD) 








4110 


* 


STRING MUST 


END WITH C-R. (*0D) 








4120 


* 


AND CONTAIN 


LESS THAN 255 CHARACTERS 








4130 


* 














4140 


















9C00- 


AO 


00 


4150 


PRINTM 


LDY 


#ZERO 


ZERO TEXT CHARACTER INDEX 


9C02- 


Bl 


06 


4160 


LOOP2 


LDA 


( MESADD >,Y 


DO AN INDEXED INDIRECT 
LOAD VIA MESADD 


9C04- 


C9 


OD 


4170 




CMP 


#CR 


CHECK FOR CARRIAGE 
RETURN CHARACTER 


9C06- 


DO 


oi 


4180 




BNE 


GOON 


IF NOT THEN JUMP 


9COS- 


60 




4190 




RTS 




OTHERWISE FINISHED, SO RETURN 


9C09- 


20 


FO 


FD 4200 


GOON 


JSR 


C0UT1 


OUTPUT THE CHARACTER 


9C0C- 


CB 




4210 




INY 




BUMP INDEX TO NEXT CHARACTER 


9COD- 


DO 


F3 


4220 




BNE 


LOOP2 


ALWAYS LOOP IF 

TEXT <= 255 CHARACTERS 


9C0F- 


60 




4230 
4240 


* 


RTS 




ONLY TAKEN IF 

TEXT > 255 CHARACTERS 


9C10- 


A9 


41 


4260 


MM1 


LDA 


#M1 


PUT TEXT STRING ADDRESS 
INTO MESADD 


9C12- 


B5 


06 


4270 




STA 


MESADD 




9C14- 


A9 


9A 


4280 




LDA 


/Ml 


AND MESADD+l 


9C16- 


85 


07 


4290 




STA 


MESADD+1 




9C18- 


20 


00 


9C 4300 




JSR 


PRINTM 


PRINT THE TEXT STRING 


9C IB- 


60 




4310 


ENDP 


RTS 




RETURN 



In all of these cases, DISKMAP will 
accurately reflect only what DOS [via 
the VTOC) thinks is used or unused. 



Clyde Camp may be contaced at 3518 
Wildflower Lane, Johnson City, Tennessee 
37601. 



JMCftO 



&T 



^r-Magic, 



MACHINE LANGUAGE SPEED 
WHERE IT COUNTS... 

IN YOUR PROGRAM! 



For the first time, Amper Magic makes it easy for people who don't know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 

You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 

Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 

These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 

xxx PRINT "PLEASE ENTER THE DATE."; : & INPUT,DATE$ 

St- MAGIC makes it Easy to be Fast & Flexible! 

PRICE: $75 



&-Magic and Amper-Magic are trademarks of Amhro-Digital, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 



Some routines on this disk are: 

Binary file info 

Delete array 

Disassemble memory 

Dump variables 

Find substring 

Get 2-byte values 

Gosub to variable 

Goto to variable 

Hex memory dump 

Input anything 

Move memory 

Multiple poke decimal 

Multiple poke hex 

Print w/o word break 

Restore special data 

Speed up Applesoft 

Speed restore 

Store 2-byte values 

Swap variables 

Anthro - Digital Software 

P.O. Box 1385 

Pittsfield, MA 01202 

The People - Computers Connection 
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WITH APPLESOFT? 



B.E.S.T. Our original Applesoft Optimizer (AOPT) has now been en- 
hanced to bring to the Applesoft programmer the most comprehen- 
sive set of software tools available today — B.E.S.T. The BASIC 
ENHANCED SOFTWARE TOOLS is a machine language program to 
aid in writing, analyzing, and debugging Applesoft Basic programs. 
B E.S.T. will certainly increase programmer efficiency for improved 
productivity. B.E.S.T. offers: 1) Variable Cross-Reference, 2) Line 
number Cross-Reference, 3) A Complete Cross-Reference, 4) Opti- 
mize variable names with recognition of both short (two character/ 
Applesoft standard) and long labels, 5) REM Optimizer— with an 
option to "protect" specified REM statements, 6) Line Optimizer to 
join short instruction lines of specified length, 7) Merging two pro- 
grams, 8) Automat'C line numbering, and 9) A powerful, yet easy to 
use Renumber function. Implementation of B.E.S.T. can reduce 
memory requirements by up to 50% and increase execution speed of 
Applesoft programs by up to 100%. B.E.S.T. is a low cost alternative 
to an Applesoft compiler. 
B E ST. requires a 48K Apple ll/ll + , Applesoft in ROM or Language 

card, and DOS 3.3 $40.00 

EDIT-SOFT. A powerful, yet affordable, line editor for Applesoft. Us- 
ing EDIT-SOFT, you can drastically cut your programming time. EDIT- 
SOFT not only contains the standard line editor features like inserting 
or deleting characters, moving to a specific character, entry of lower 
case letters, going to the beginning or end of a line, and displaying 
control characters, but it also has the advanced features that will 
prove indispensable: 

• AUTO LINE NUMBERING 

• SPLICING two lines together 

• AUTOMATIC CHARACTER COUNTER for quoted strings 
makes screen formatting a snap 

• EDITING LINES as they are being TYPED 

• A STATUS LINE keeps you constantly aware of which 
options are currently being used 

• Up to TWENTY MACROS available at any time 
■ MACRO EDITING AT ANY TIME 

• HELP PAGES available when needed 

Compare the features of EDIT-SOFT to other line editors, then com- 
pare the price. No other line editor has so many features at such a 
reasonable price! 

EDIT-SOFT requires 48K of RAM, Applesoft in ROM (language and 
RAM expansion cards are fine), and DOS 3.3. ONLY $30.00 
APLUS. The original Structured Basic enhancement for Applesoft 
Basic. APLUS provides the tools that will increase your efficiency, 
simplify program rewriting, and make your program flow more 



understandable. No longer do you have to remember the line 
numbers of subroutines and procedures: instead, just "DO 
GRAPHIT" and APLUS does the rest. APLUS adds the following 
structured programming commands to Applesoft basic: 
WHEN . . ELSE . . FIN, UNTIL, WHILE, CASE, SELECT, and OTHER- 
WISE. Multi-line IF. . FIN statements are also supported. APLUS 
includes functions to output indented listings to clarify logic flow and 
converting source code to standard Applesoft commands. 
Requires Applesoft, 32K of RAM, and DOS 3.3 .. . Only $25.00. 
BUILD USING. Do you have trouble printing charts, reports, or for- 
matting numbers on the screen? If you do, BUILD USING can solve 
your problems. BUILD USING is a powerful Applesoft utility which 
provides a "print-using" type routine for numbers and strings. By 
creating simple "formats", you tell BUILD USING how to format the 
output. The output from BUILD USING are strings which may be 
printed, written to disk, saved for later usage, or even reformatted. 
With BUILD USING, you can choose how many digits should be 
displayed to the left and right of the decimal point, and even fill the 
leading positions with the character of your choice. For example, you 
can print the number '157.23' and '157.2 1 or '000157.230', or 
'****$157. AND 23/100 DOLLARS', or hundreds of other ways 
(including exponential formats). Working with strings is just as easy. 
Also included are three levels of error trapping, so you can correct 
numbers that cannot fit into your specified format. 
Utilities like BUILD USING are usually difficult to use because they 
must be located in one memory location (usually between DOS and 
the DOS file buffers), they cannot be used with your favorite editor or 
other special routines. BUILD USING does not have this limitation, as 
it can be easily located in many different memory locations: 1) the 
"standard" between DOS and DOS file buffers, 2) at HIMEM, 3) 
APPENDED to your Applesoft program, or 4) anywhere else in 
memory. Appending BUILD USING to your program is as simple as 
EXECing a TEXT file. BUILD USING uses the "CALL" command 
thereby leaving the ampersand vector free for your own use. 
BUILD USING requires Applesoft in ROM (Language cards are fine), 
DOS 3.3 and a minimum of 32K . . . Only $30.00 



m 



Sensible Software 

| 6619 Perham Drive Dept. MO 
' West Bloomfield, Michigan 48033 
(31 3) 399-8877 

Please specify program desired. 
Visa and Mastercard Welcome, Add $1.25 postage and handling per diskette, 



• Applesoft is a registered trademark of APPLE Computer Company • 
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* 



from 



HIM + POWER 
COMPUTECH 



All prices 
postpaid 

(Continental 
US- 
otherwise 
s 2 credit) 




Check the 
outstanding 
documenta- 
tion supplied 
with AIM65! 



Top quality power supply designed to Rockwell's specs for fully 
populated AIM65 — includes overvoltage protection, transient sup- 
pression, metal case and power cable: 

PSSBC-A (5V 2A Reg; 24V .5A Avg, 2.5A Peak, Unreg) .... *64.95 
Same but an extra AMP at 5 volts to drive your extra boards: 
PSSBC-3 (5V 3A Reg; 24V .5A Avg, 2.5A Peak, Unreg) .... '74.95 
The professional's choice in microcomputers: 

AIM65/1K RAM *429.95 BASIC (2 ROMS) *59.95 

AIM65/4K RAM *464.95 ASSEMBLER (1 ROM) *32.95 

FORTH (2 ROMS) *59.95. 

SAVE EVEN MORE ON COMBINATIONS 

AIM65/1K + PSSBC-A ... »479.95 AIM65/4K+ PSSBC-3 .. *524.95 
We gladly quote on all AIM65/40 and RM65 items as well. 



P.O. Box 20054 • Riverside, CA 92516 
California residents add 6% sales tax 



* 
* 
* 
* 
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* 
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OS I Disk Users 



Double your disk storage capacity 
Without adding disk drives 

Now you can more than double your usable floppy disk 
storage capacity — for a fraction of the cost of additional 
disk drives. Modular Systems' DiskDoubler ™ is a double- 
density adapter that doubles the storage capacity of 
each disk track. The DiskDoubler plugs directly into an 
OSI disk interface board. No changes to hardware or 
software are required. 

The DiskDoubler increases total disk space under OS- 
65U to 550K; under OS-65D to 473K for 8-inch floppies, 
to 163K for mini-floppies. With the DiskDoubler, each 
drive does the work of two. You can have more and 
larger programs, related files, and disk utilities on 
the same disk — for easier operation without constant 
disk changes. 

Your OSI system is an investment in computing power. 
Get the full value from the disk hardware and software 
that you already own. Just write to us, and we'll send you 
the full story on the DiskDoubler, along with the rest 
of our growing family of products for OSI disk systems. 

™DiskDoubler is a trademark of Modular Systems. 

Post Office Box 16 C 
Oradell, NJ 07649.0016 
Telephone 201 262.0093 



Modular Systems 



I never go back to BASIC! 



EXTENDED Z-FORTH IN ROM by Tom Zimmer 

5 to 10 times faster than Basic. Once you use it, you 

A FULL 8K OPERATING SYSTEM source listing add 

OSI FIG-FORTH True fig FORTH model for 0S65D with fig editor named files, string package & much more 

STARTING FORTH by L Brodie 

The best reference for Forth available to date. A must for the beginner, and refreshing to the 

experienced Forth Programmer, paperback only. 

TINY PASCAL Operates in fig-FORTH, an exceptional value when purchased with forth. 

Requires 32K min. TINY PASCAL & documentation 

FORTH &TINY PASCAL 

16 K RAM BOARD with 2K of EPROM 

The first and only memory board for 16 K of Ram plus 2 K of 2716 

EPROM. Available as a bare board for the C1P only. 

PROGRAMMABLE CHARACTER GENERATOR 

Use OSI's graphics or make a complete set of your own! Easy to use, Bare Board Only. 

PROGRAMMABLE SOUND BOARD 

Complete sound system featuring the AY-3-8910 sound chip. Bare boards only. 
32/64 CHARACTER VIDEO MODIFICATION 

Oldest and most popular video mod. True 32 chr. C1P, or 32/64 chr. C4P video display. 
Optional Multiplexer board allows all three OSI Screens. Bare Board only. 

ROMS!!! 

Augment Video Mod with our Roms. Full screen editing, print at, selectable 

scroll, disc support and many more features. 

Basic 4 & Monitor 

Basic 3 

All 3 for 

65D DISASSEMBLY MANUAL by Software Consultants 

First class throughout. A must for any 65D user. 

NUMEROUS BASIC PROGRAMS, UTILITY PROGRAMS AND GAMES ALONG WITH HARDWARE PROJECTS. ALL 

PRICES ARE U S FUNDS. 

Send for our $1.50 catalogue with free program (hardcopy) and Auto Load Routine. 

Canadian Residents: Price list in Canadian available on request. 



$100.00 

$ 20.00 

$ 45.00 

$15.95 



$ 45.00 

$ 65.00 

$39.95 



$ 39.95 

$ 29.95 

$ 39.95 

$ 14.95 



44.95 
15.95 
59.95 



$ 25.95 



OSI 





Progressive Computing 

Rick Lotoczky 
3486 Countryside Circle 
Pontiac Twp., Ml 48057 
(313) 373-0468 

Joe Endre 

3336 Avondale Court 
Winsor, Ontario 
Canada N9E 1X6 
(519) 969-2500 
(after 4:00) 



OSI 
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Build An Apple Cart 



by Tom Fisher and Michael Straka 



Even if you live in an apartment 
and have only a few hand tools, 
it's possible for you to build a 
decent home for your Apple for 
less than $50. 



Do you still have your computer perched 
on an old packing crate? Or, maybe it's 
on the dining table and has to be moved 
before each meal? Well, here's an inex- 
pensive way to give your Apple a home 
of its own. 



Construction 

The scale drawing (figure 1) and the 
parts list (table 1) provide sufficient in- 
formation for the average handyperson 
to construct the AppleCart. The cart 
consists of several shelves, a back 
panel, two short and two tall side 
panels butted together, reinforcement, 
and casters. Simple design makes the 
AppleCart easy to construct. The desk 
(bottom) shelf is made from two 
shelves simply because the commercial 
vinyl-clad shelving isn't available in a 
24" width. The monitor (middle) shelf 
is shifted rearward to keep the screen 
away from your nose; the book (top) 
shelf is shifted forward to be more ac- 
cessible to a seated operator. Because 
we expected to have to transport the 
cart in a small car occasionally, we 
used wood screws to provide for easy 
disassembly. The screws were posi- 
tioned 2" apart in the shelves and 
backpanel, and 3 A" vertically and 6" 
horizontally elsewhere. 

Additional Pointers 

You can save money by cutting your 
own shelves and covering them with 
adhesive shelf paper. Buy good casters, 
but shop around. We found that prices 
for comparable casters vary by a factor 
of three or more! 

Until the lumber industry learns to 
use a ruler, the dimensions shown in 
the drawing must be taken as approx- 
imations. The width of the particle 



board we purchased varied from less 
than UVi" to almost 12". Even the 
finished shelving varied by l A" from 
shelf to shelf. The design's most 
troublesome factor is the length of the 
shelf reinforcement; each piece must be 
cut to match the corresponding shelf. 

Modifications 

By now apartment dwellers are say- 
ing: "That's fine if you have a 173 hp 
radial saw, an industrial-grade drill 
press, and deaf neighbors. But we can't 
build that in an apartment!" While it's 
true that we waltzed down to the 
Physics Workshop to build our carts, 
the design can be modified so that it re- 
quires only hand tools and lots of glue. 
To minimize sawing, purchase the 60" 
lengths of particle board (for the tall 
side panels) which are available from 
some lumber yards. If you can't get the 
short side panels cut at the yard, you'll 
only have to make two 12" cuts with a 
handsaw. 



Table 1: Parts List 

Three 60" x 12" particle board 

panels 
Three 36" x 12" particle board 

panels 
One 36" x 16" vinyl-clad shelf 
One 36" x 10" vinyl-clad shelf 
Two 36" x 8" vinyl-clad shelves 
Seventy-six 10" x IVi "slotted 

flathead wood screws 
Four 2" diameter rubber casters 
Sixteen 10" x IVi" slotted round- 
head wood screws 

...or for apartment dwellers and 
others who don't have a power saw 
and an electric drill... 

Cancel one of the 60" x 12" panels, 
the casters, and all the wood screws 
and add: 

Five 36" x 1" diameter dowel rods 
Wood glue 



Figure 1; Scale drawing of the AppleCart. All dimensions are inches. The side 
panels, back panel, and shelf reinforcements are particle board; the four shelves 
are white vinyl-clad commercial shelving. 
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Substitute 1" diameter dowel rods 
for the shelf reinforcement. It may take 
a while using the "file-and-fit" method, 
but at least you don't have to buy a 
radial saw. You'll have to forego casters 
if you use dowels to reinforce the base 
of the cart; just remember that the 
casters add 2Vi" to the height. 

Using glue makes it unnecessary to 
drill, but requires that you construct a 
jig to hold the pieces while the glue 
dries. (Contact cement is not recom- 
mended because of the awkwardness of 
handling such large pieces of lumber.) 
So find a clear corner of the apartment 
and put some books of equal thickness 
(an encyclopedia set?] on the floor to 
create a surface that is higher than the 
baseboard. That corner, plus a few 
chairs and some heavy books, can serve 
as an overnight jig. Use wax paper to 
protect everything you don't want 
glued! Since the shelving (listed in the 
parts list) is covered with vinyl tape, 
this should be removed from areas that 
are to be glued, and those areas should 
be cleaned. 

Improvements 

More than 50 people have used the 
AppleCarts we built. Here are some 
ways they would improve them. 

Many people asked: "When are you 
going to paint them?" We're not. We 
like the way they look, and further- 
more, we're lazy. If you're going to 
paint yours, you might as well save 
some money by using particle board for 
the shelves, too. But you'll probably 
have to do lots of sanding. 

Our secretary says the desk shelf is 
too high for convenient typing; you 
may want to lower the shelf about 2" . 
She also doesn't like the monitor up so 
high. We like it there because we can 
conveniently remove the Apple's cover 
to eyeball the chips. So, if you use your 
Apple mostly for text editing, and you 
never mess with the Apple's innards, 
you may want to omit the monitor 
shelf and place the monitor on top of 
the Apple in the classical fashion. 

If you install an undershelf light, 
position it so that it won't glare on the 
monitor screen. Also remember that, 
over a long period of time, a fluorescent 
light could erase your EPROMs! 

An undershelf drawer could be used 
to store pencils and candy bars; you can 
fashion one from a silverware tray. 

One essential attachment is a 
plugbar or powerstrip mounted on the 



rear panel, or perhaps at the very rear of 
the desk shelf. 
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Happy building! 
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Figure 2: The completed AppleCart. Photo by Ruth E. Reed 
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S&H Software 

presents Apple II users 

with two chances 

to increase 

speed and productivity 

up to 




illill! 






Universal Boot Initializer 4.0 will 
work up to 500% faster than 
standard Apple DOS 3.3...$69.95 

The new UBl 4.0 now includes The DOS Enhancer, a DOS- 
transparent routine that allows execution of Apple DOS 3.3 files (In- 
teger, Applesoft and Binary) up to 500% faster than standard Apple 
DOS— depending on file length. In addition, a new "FREE" command 
in DOS now allows determination of free space on a disk in "any slot, 
any drive"— from the command mode or the program mode. 

UBl 4.0-created disks increase efficiency by breaking the "language 
barrier" between Apple II hardware and software and breaking the 
"time barrier" by loading the RAM card with FPBASIC/INTBASIC (or 
leading assemblers) in 1.7 seconds. This unique combination of 
features greatly increases productivity: copyable disks, one-stage 
booting with DOS 3.3 or DOS 3.2.1 PROMS, fast-loading the RAM card 
with the "missing BASIC" (or your favorite utility), fast-(B)RUNning or 
fast-(B)LOADing your programs and complete compatibility with all 
DOS 3.3 programs. 

The new UBl 4.0 package includes the utility disk, training disk, sup- 
port disk, demo disk and complete documentation. System re- 
quirements: Apple II or Apple II Plus, ROM or RAM card, DOS 3.3 or 
3.2.1 and one or more disk drives. 



Am per- Sort /Merge (A-S/M) works 
up to 500% faster than even 
VisiCorp's VisiFile™ program...$52.95 

The fastest "file clerk" you've ever met. Of all the sort utilities 
developed to manage Apple II data files, none does the job nearly so 
fast as Amper-Sort/Merge. 

Here's a quick profile of "A-S/M": With 25K of working memory, one 
of five unsorted files can be sort/merged into a single file of up to 125K 
per disk. If a file to be sorted is more than 25K in length, the utility tem- 
porarily lays it aside to be sorted and merged when more memory 
space is available. 

Because sorting routines take up to 50% of the computer running 
time in many business applications, you'll reap continuing benefits hav- 
ing this "invisible speed demon" on your Apple II team. We estimate 
that it will save twenty to thirty minutes a day of your "human" clerk's 
time— time that would otherwise be spent waiting for "sort/merge" 
operations. 

The A-S/M "speed demon" package includes the utility disk, the 
training disk and 24 page instruction manual. System requirements: 
48K Apple II, ROM or RAM card, DOS 3.3 and one or more disk drives 
or 48K Apple II Plus, DOS 3.3 and one or more disk drives. 



To Order: Send Check To S&H Software, Box 5, Manvel, ND 58256 Credit Cards: Phone Cybertronics International Clearinghouse at 212 532-3089. 
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Box 5 Manvel ND 58256 
<701) 696-2574 



A feast of 
computing ideas. 




You'll love every byte. 

If you work with a 6502 or 6809 based 
system, you're probably hungry for the 
facts and ideas that will help you under- 
stand the inner workings of your com- 
puter. You want to go beyond canned 
software- use your computer for more 
than games- learn the advanced pro- 
gramming techniques that enable you 
to get the most out of your 6502/6809 
system. 

MICRO, The 6502/6809 Journal, 
gives you page after page, month after 
month, of solid information to sink your 
teeth into. MICRO is the premier how-to 
magazine for serious users of the Apple, 
PET/CBM, OSI, Atari, AIM, SYM, KIM, 
and all 6809 based systems including 
the TRS-80 Color Computer. It's a re- 
source journal internationally respected 
by professionals in business, industry, 
and education. 

SUBSCRIPTION RATES (U.S. dollars) 
Yearly subscription (ISSN 027-9002) 
saves 20% off the single-issue price. 
U.S., $24 (SPECIAL OFFER: Save 30% 
off single-issue price: 2 years, $42) 
Other countries, $27 (via surface mail. 
Foreign air rates available on request.) 



Get more out of your Apple . . . 



with the MICRO 

ON THE APPLE series 



/AlCftO 

on the Apple 

VolumeO 



I INCLUDES I 
DISKETTE | 




VOLUME 3 just released! 

More than 40 new programs on diskette 
to help you get more from your Apple: 

• Machine Language Aids 

• I/O Enhancements 

• Applesoft Aids 

• Graphics and Games 

• Reference Information 
19 choice articles 

43 tested programs on diskette 
(16 sector DOS 3.3 format) 
Volume 1 & 2 also available at $24.95. 
Together MICRO on the Apple 1, 2, & 3 
provide more than 110 programs on disk- 
ette for less than $1.00 each. No need 
to type in hundreds of lines of code. 



with the most impor- 
tant book ever 
published for the Apple 




The most comprehensive description 
of Apple II firmware and hardware ever 
published — all in one place. 
What's Where in the Apple? 

• Guides you— with a numerical At- 
las and an alphabetical Gazetteer— to 
over 2,000 memory locations of PEEKs, 
POKEs and CALLs. 

• Gives names and locations of vari- 
ous Monitor, DOS, Integer BASIC, 
and Applesoft routines— and tells you 
what they're used for. 

• Helps BASIC users to speed up 
their programs. 

• Enables assembly language pro- 
grammers to simplify coding and inter- 
facing. 

All Apple users will find this book help- 
ful in understanding their machine, and 
essential for mastering it! 



• Look for all these MICRO INK publications at your local computer store, or 

• Call our toll-free number: 1-800-345-8112 

(In Pennsylvania, t -800-662-2444) and charge it to your VISA or MasterCard, or 

• Use the order form below. Send your check (payable to MICRO) and the form to: 

MICRO, Dept. OA, P.O. Box 6502, Chelmsford, MA 01824. 



MICRO on the Apple 1, 2, & 3 @ $24 95 
What's Where in the Apple?. @ $1 4 95 

MICRO (U.S.) . . . . 1 yr @ $24; 2 yrs @ $42 

MICRO (Foreign) 1 yr @ $27 

Subtotal . 
Massachusetts residents add 5% sales tax 
Add $2 per book for shipping 

MICRO Journal excluded Allow 4-6 weeks for delivery. 

TOTAL 



cost □ Check enclosed 



□ Charge my credit card below 



Company 



City 



Signature 



State ZIP 

□ VISA □ MasterCard 



Expiration Date 
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Apple Slices 



By Tim Osborn 



Apple Slices is a new series designed for 
the do-it-yourselfer who wants to know 
more about the Apple II computer. 
Through a tutorial approach, Apple 
Shces will present concise programming 
examples and techniques for solving 
common programming problems. 

If you are a beginner, this series will 
bring you up to speed on Apple II pro- 
gramming. If you are an intermediate to 
expert, Apple Shces will offer you 
helpful insights and alternative methods 
of programming. 

No matter what level, if you 're a do- 
it-yourselfer, you'll want to keep this 
series handy as a reference to Apple II 
programming techniques. 

When it comes to speed of execution, 
nothing beats machine language. But 
this advantage must be weighed against 
the difficulty of rewriting Applesoft's 
built-in functions. So for most applica- 
tions, Applesoft's ease of use compen- 
sates for its slower run-time perfor- 
mance. There are, however, occasions 
when Applesoft's speed is not accept- 
able, and we may wish to include 
machine-language subroutines to speed 
up the execution of critical functions. 
One of the problems that arises in doing 
this is in the passing of information to 
and from the assembly-language subrou- 
tines. This article will demonstrate one 
of the methods to accomplish this task. 

Getting to the Subroutine 

Before we talk about passing vari- 
ables, I would like to review a popular 
method of calling machine-language 
subroutines, the ampersand (&) vector. 
The ampersand vector is one of the 
handiest, but least documented, fea- 
tures of Applesoft. When the inter- 
preter finds an ampersand character at 
the beginning of an Applesoft state- 
ment, it executes a JSR $3F5. If the user 
has loaded a JMP instruction at $3F5 to 
a machine- language subroutine, the 
connection is effectively made. One 
smooth way to install this JMP is 
demonstrated by the routine named 
"SETVEC" in listing 1. Using this 
method, we need only BRUN the object 
file from BASIC, as in line 20 of listing 



2. This method has the added feature of 
establishing HIMEM for you and thus 
protecting your subroutine from being 
destroyed by Applesoft. 

Passing Parameters 

Now that we can make the connec- 
tion with the subroutine, let's look at 
parameter passing. A nice feature of the 
ampersand method is that the first non- 
space character following the amper- 
sand is in the accumulator upon entry 
to your subroutine. Also, the Applesoft 
text pointer (TXTPTR) is pointing to 
this character in your BASIC program. 
If the ampersand is followed by an 
Applesoft command keyword, then the 
token for that command will be in the 
accumulator upon entry to your 
subroutine. 



To take advantage of these features, 
we must first understand the following 
routines that are essential to the perfor- 
mance of the interpreter. 

CHRGET ($B1) 

This Applesoft routine accesses 
characters in your BASIC program. It 
uses TXTPTR ($B8-$B9) to point into 
the BASIC program. Upon entry, the 
TXTPTR is incremented and the value 
it then points to is loaded into the ac- 
cumulator. Another entry point, which 
is called CHRGOT ($B7), does essen- 
tially the same — but does not incre- 
ment TXTPTR. Upon exit from these 
subroutines, the zero status flag is set if 
we are at the end of a BASIC command, 
and the carry flag is clear if the value 
loaded was an ASCII number. 

FIND ($E053) 

This routine uses VARNAM 
($81-$82), which should contain the 
two-byte variable name upon entry, 
and exits with the DSCPTR ($9B-$9C) 
pointing to the variable's descriptor. 
For the encoding of the variable names, 
Applesoft uses the following scheme: 



Byte-1 Byte-2 

REAL Positive Positive 

INTEGER Negative Negative 

STRING Positive Negative 



The second byte is null ($00) or 
negative ASCII null ($80) if it is a one- 
byte name. If you have the same ver- 
sion as I do of the Applesoft BASIC Pro- 
gramming Reference Manual, then 
page 137 contains an error. The manual 
shows string variable names as being 
encoded as negative ASCII, positive 
ASCII: this should be positive ASCII, 
negative ASCII as noted above. You 
may want to scratch in the correction 
as I did. Also, you may wish to check 
with page 137 to gain a better under- 
standing of Applesoft's descriptor for- 
mats, (which are, by the way, the same 
for all versions of Microsoft BASIC). 

An added feature of FIND is that it 
will create a descriptor for you if none 
is found. 



DATA ($D995) 

This routine sets the Text-pointer 
(TXTPTR) to the end of the current 
statement. It should be called before 
returning to BASIC; otherwise a syntax 
error may occur. 



The Example 

Listings 1 and 2 are an example of 
how we can put this all together to pass 
parameters back and forth between 
BASIC and machine language. In the 
example, we want to print either the 
left-most or right-most character of a 
string or assign the value of another 
string to X$. This example has purposely 
been simplified in order to illustrate 
the principle clearly. The BASIC pro- 
gram (listing 2) hands the machine- 
language program a string and a com- 
mand. The machine-language program 
will actually perform the functions. 

Once the machine-language pro- 
gram is installed via a BRUN, Applesoft 
will, upon encountering an ampersand, 
effectively JSR to the routine named 
"ENTRY" in listing 1. The first thing 
we need to do in our machine-language 
routine is to decide which function we 
have been called to perform. ENTRY 
does this by looking at the value in the 
accumulator and branching to the proper 
internal routine. I have chosen the 
Applesoft commands LEFT$ and 
RIGHT$ to print the left-most and 
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Example 1 



]RUN 

THIS IS A TESTER 

T 

R 

PPPPPPPP%%&&&&&&&& 

P 

& 

1 



right-most byte of the passed string 
respectively. The equals sign (" = ") 
was chosen to assign passed strings to 
X$. The syntax for the commands 
follows: 

& RIGHTS ( < xx > $) : Print right-most 
byte of string specified by xx. 

& LEFTS ( <xx> $) : Print left-most 
byte of string specified by xx. 

& = ( <xx > $) : Move string specified 
byxxtoX$. 

Once we know what function we 
have been called to perform, the next 
thing to do is to find out which string 
we have passed. We do this with a JSR 
to GETVAR, the internal subroutine to 
load VARNAM and JSR to FIND. I have 
included some error checking in GET- 
VAR to make sure we have been passed 
a valid variable name. After we return 
from FIND, we index into the descrip- 
tor to get the length and save it, and 
then do the same for the address. 

In the case of & RIGHTS, we load 
the Y register with the length and 
decrement it to establish an index to 
the right-most byte of the passed string. 
For & LEFT$, this index is always zero. 
After establishing the index, we JMP to 
OUTPUT, which uses the index and 
address to find the desired character 
and simply prints it. OUTPUT does a 
JSR to DATA to advance TXTPTR to 
the end of the statement. The RTS 
sends us back to BASIC. 

The move (& = ) is just a little more 
involved. After finding the address and 
length of the passed variable, we set up 
VARNAM to X$ ($58, $80) and JSR to 
FIND (which either finds X$ or 
establishes its descriptor). Either way, 
upon return we have the address of its 
descriptor in DSCPTR and the passed 
variable's address in VARPNT and 
length in LENGTH. X$'s address is 
known because it is internal to the 
subroutine at $80D0. Having all this 
information, we just need to move the 
passed variables bytes from VARPNT 
through VARPNT + LENGTH -1 to 



Listing 1 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0800 

0073 

009B 

ESCRIPTOR 

008L 

AME 

00D0 



0083 

0800 

0800 

O0E9 

00 E8 

0OD0 

0800 

0800 

0800 

00B1 

D995 

END OF I 

E053 

DEC9 

AGE 

0800 

0800 

03F5 

FDED 

0800 

0800 

8000 

8000 

8000 

8000 

8000 

8000 

8000 

8000 A9 

8002 8D 

8005 A9 

8007 8D 

800A 85 

800C A9 

800E 8D 

8011 85 

8013 60 
8014 
8014 

8014 C9 
R? 

8016 DO 
8018 4C 
801B C9 



801D DO 
801F 4C 
8022 C9 
8024 DO 
8026 4C 
8029 4C 
802C 
802C 
802C 20 
802F F0 
8031 C9 
8033 DO 
8035 20 
8038 F0 
803A 90 
803C 85 
803E 20 
8041 F0 
8043 C9 
8045 DO 



4C 

F5 03 
14 

F6 03 
73 
80 

F7 03 
74 



03 

6D 80 
E8 

03 

79 80 
DO 
03 

86 80 
C9 DE 



28 
F4 
Bl 00 



81 

Bl 00 



8047 A9 00 
NAME 

8049 09 80 
804B 85 82 
804D 20 53 EO 

8050 A0 02 
8052 Bl 9B 
8054 8D CF 80 

8057 C8 

8058 Bl 9B 
805A 85 83 
805C C8 
805D Bl 9B 



5 

6 

7 

8 

9 

10 

11 

12 



70 
71 
72 
73 

74 
75 
76 
77 
78 



81 
82 
83 
84 
85 
86 
87 
88 
89 
90 



****************************** 

* APPLE SLICES * 

* DEMONSTRATION OF PASSING * 

* VARIABLES TO AND FROM * 

MACHINE LANGUAGE * 
' T. S. O. * 

* * 
****************************** 



HIMEM 
DSCPTR 



EPZ $73 
EPZ S9B 



? APPLESOFT TOKENS 
RIGHT$ EPZ $E9 
LEFT$ EPZ $E8 
EQL EPZ SD0 

APPLESOFT BUILT IN ROUTINES 



CHRGET 
DATA 



FIND 
SYNERR 



AMPERV 

COUT 



EPZ $B1 
EQU $D995 



EQU SE053 
EQU $DEC9 



EQU $3F5 

EQU $FDED 



16 VARNAM EPZ $81 

17 WRKPTR EPZ $D0 



18 VARPNT EPZ $83 



20 
21 
22 
23 
24 
25 
26 
27 
28 

29 
30 

31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 

53 ; 

54 ; 

55 ENTRY 

56 
57 
58 LEFT$? 

59 

60 

61 MOVE? 

62 

63 

64 ERROR 

65 ; 

66 ? 

67 GETVAR 



?HIMEM POINTER 

; POINTER TO CURRENT VARIABLE D 



; CONTAINS LAST USED VARIABLE N 
?WORK POINTER FOR THIS PROGRAM 



POINTER TO VARIABLE STORAGE 



? EQUALS SIGN 



; ROUTINE TO GET A CHARACTER 
r ROUTINE TO ADVANCE TXTPTR TO 



; ROUTINE TO FIND DESCRIPTOR 

; ROUTINE TO DISPLAY ERROR MESS 



; AMPERSAND VECTOR ADDRESS 
r CHARACTER OUTPUT ROUTINE 



ORG $8000 

OBJ $800 ? FOR LISA 

rSETVEC SETS UP THE AMPERSAND 
r VECTOR ADDRESS TO ENTRY 
;AND SETS HIMEM TO ENTRY TO PROTECT 
rTHIS ROUTINE FROM OVERWRITES. 



SETVEC 



LDA #$4C 
STA AMPERV 
LDA # ENTRY 
STA AMPERV+1 
STA HIMEM 
LDA /ENTRY 
STA AMPERV+2 
STA HIMEM+1 
RTS 



CMP #RIGHT$ 

BNE LEFT$? 

JMP RIGHT 

CMP #LEFT$ 

BNE MOVE? 

JMP LEFT 

CMP #EQL 

BNE ERROR 

JMP MOVE 

JMP SYNERR 



JSR CHRGET 

BEQ ERROR 

CMP # ' ( ' 

BNE ERROR 

JSR CHRGET 

BEQ ERROR 

BCC ERROR 

STA VARNAM 

JSR CHRGET 

BEQ ERROR 

CMP # ' $ ' 

BNE NAMLNG 

LDA #$00 



80 NAMLNG ORA #?80 



STA VARNAM+1 

JSR FIND 

LDY #2 

LDA ( DSCPTR ),Y 

STA LENGTH 

INY 

LDA ( DSCPTR ),Y 

STA VARPNT 

INY 

LDA (DSCPTR) ,Y 



;JUMP ABSOLUTE INSTRUCTION 
;LSB OF ENTRY ADDRESS 



;SET HIMEM TO ENTRY 
;MSB OF ENTRY ADDRESS 



?DO WE WANT RIGHTMOST CHARACTE 



;YES 

;DO WE WANT LEFTMOST CHARACTER 



;YES 

;DO WE WANT TO DO MOVE 

;IF NOT, THEN SYNTAX ERROR 

t DISPLAY ERROR MESSAGE 



rGET NEXT CHARACTER 

TERROR IF END OF LINE 

; SHOULD BE LEFT PAREN 

;IF NOT THEN SYNTAX ERROR 

rGET NEXT CHARACTER 

7 SHOULD NOT BE END OF LINE 

7 SHOULD NOT BE ASCII NUMBER 

; FIRST CHAR OF NAME 

;GET NEXT CHARACTER 

7 SHOULD NOT BE END OF LINE 

J DOLLAR SIGN? 

;NO, MUST BE TWO CHARACTER NAM 

;YES, THIS IS A ONE CHARACTER 

; NEGATIVE ASCII 

rFIND DESCRIPTOR 

rGET AND SAVE THE 

7 LENGTH OF PASSED STRING 

rGET AND SAVE THE 

r ADDRESS OF PASSED STRING 
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Listing 1 (Continued) 










805F 85 84 


91 




STA VARPNT+1 






8061 60 


92 




RTS 






8062 


93 










8062 


94 










8062 Bl 83 


95 


OUTPUT 


LDA (VARPNT),Y r 


GET CHARACTER TO PRINT 




8064 09 80 


96 




ORA #$80 ; 


APPLE NORMAL IS NEG-ASCII (OT 




HERWISE WILL PRINT INVERSE) 








8066 20 ED FD 


97 




JSR COUT r 


AND PRINT IT j 




8069 20 95 D9 


98 


NOTFND 


JSR DATA 7 


POINT TXTPTR AT NEXT COMMAND 




806C 60 


99 




RTS • 


RETURN TO BASIC 




806D 


100 










806D 


101 










806D 20 2C 80 


102 


RIGHT 


JSR GETVAR ; 


GET LENGTH AND ADDRESS 




8070 AG CF 80 


103 




LDY LENGTH 


INDEX TO RIGHTMOST CHARACTER 




8073 F0 F4 


L04 




BEQ NOTFND 


LENGTH =0 MEANS STRING NOT FOU 




ND 
8075 88 


105 




DEY 






8076 4C 62 80 


106 




JMP OUTPUT 


OUTPUT AND RETURN TO BASIC 




8079 


107 
108 
109 










8079 

8079 20 2C 80 


LEFT 


JSR GETVAR 


GET LENGTH AND ADDRESS 




807C AC CF 80 


110 




LDY LENGTH 


LENGTH=0 MEANS 




807F FO E8 


111 




BEQ NOTFND 


STRING NOT FOUND 




8081 AO 00 


112 




LDY #$00 


INDEX TO LEFTMOST CHARACTER 




8083 4C 62 80 


113 




JMP OUTPUT 


OUTPUT AND RETURN TO BASIC 




8086 


114 










8086 


115 










8086 20 2C 80 


116 


MOVE 


JSR GETVAR 


GET LENGTH AND ADDRESS 




8089 AD CF 80 


117 




LDA LENGTH 


LENGTH =0 




S08C FO DB 


118 




BEQ NOTFND 


MEANS STRING NOT FOUND 




808E A5 83 


119 




LDA VARPNT 


•SAVE VARPNT FOR LATER USE 




8090 85 DO 


120 




ST^ WRKPTR 






8092 A5 84 


121 




LDA VARPNT+1 






8094 85 Dl 


122 




STA WRKPTR+1 






8096 A9 58 


123 




LDA #'X' 






8098 85 81 


124 




STA VARNAM 






809A A9 80 


125 




LDA #$80 


■ NEGATIVE ASCII NULL 




809C 85 82 


126 




STA VARNAM+1 






809E 20 53 EO 


127 




JSR FIND 


;FIND DESCRIPTOR 




80A1 A5 DO 


128 




LDA WRKPTR 


; RESTORE VARPNT 




80A3 85 83 


129 




STA VARPNT 






80A5 A5 Dl 


L30 




LDA WRKPTR+1 






80A7 85 84 


131 




STA VARPNT+1 






80A9 AO 02 


132 




LDY #2 






80AB AD CF 80 


133 




LDA LENGTH 


; LENGTH OF PASSED STRING 




80AE 91 9B 


134 




STA (DSCPTR),Y 


r STORE LENGTH IN X ' S DESCRIPTO 




R 

80B0 A9 DO 


135 




LDA #X$ 


r LSB OF X'S ADDRESS 




80B2 C8 


136 




INY 






80B3 91 9B 


137 




STA (DSCPTR) ,Y 


; STORE ADDRESS Iff X'S DESCRIPT 




OR 

80B5 85 DO 


138 




STA WRKPTR 


?SET UP WO RKPO INTER 




80B7 A9 80 


139 




LDA /X$ 






80B9 C8 


140 




INY 






80BA 91 9B 


141 




STA (DSCPTR) ,Y 






80BC 85 Dl 


142 




STA WRKPTR+1 






80BE AE CF 80 


143 




LDX LENGTH 


;SET UP CHARACTER COUNTER 




80C1 AO 00 


144 




LDY #$0 






80C3 Bl 83 


145 


MVLOOP 


LDA (VARPNT) ,Y 


;GET PASSED STRING 




80C5 91 DO 


146 




STA (WRKPTR) ,Y 


;AND MOVE TO X 




80C7 C8 


147 




INY 






80C8 CA 


148 




DEX 


; DECREMENT CHARACTER COUNTER 




80C9 DO F8 


149 




BNE MVLOOP 






80CB 20 95 D9 


150 




JSR DATA 


;MOVE TXTPTR TO NEXT COMMAND 




80CE 60 


151 




RTS 






80CF 


152 










80CF 


153 


r INTERNAL STORAGE AREA 






80CF 


154 










80CF 


155 


LENGTH 


DFS $1 






80DO 


156 


x$ 


DFS $100 






81D0 


157 










81D0 


158 










81D0 


159 




END 





$80D0 through $80D0 + LENGTH- 1, 
stuff $80D0 into the address portion of 
X$'s descriptor, and LENGTH into the 
length portion. After that is ac- 
complished, we JSR to DATA and RTS 
back to BASIC. Once back in BASIC, 
we can access X$ just like any other 
variable. 

Follow through listings 1 and 2 and 
look at the output in example 1 to clar- 
ify these points. This basic system of 
passing parameters can be expanded to 
include REAL and INTEGER simple var- 
iables. If you have any questions, prob- 
lems, or suggestions for future topics, 
please feel free to drop me a note. 

References 

1. Apple Computer Inc., "Applesoft 
Variable Maps," pg. 137, Applesoft 
Programming Reference Manual. 

2. Crossley, "Applesoft Internal Entry 
Points," The Apple Orchard, March/ 
April 1980. 

3. Cornelis Bongers, "Applesoft's 
CHARGET Routine," Call 
—A.P.P.L.E., March 1982. 
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Listing 2 



10 CD$ = CHR$ (4) 

20 PRINT CD$"BRUN ARTICLE. CODE , A$8000" 

30 A$ = "THIS IS A TESTER" 

40 & = (A$) 

50 PRINT X$ 

60 & LEFT$ (A$) 

65 PRINT 

70 & RIOTT$ (A$) 

75 PRINT 

80 BB$ = "PPPPPPPP%%$c&StSc&&&&" 

90 & = (BB$) 

100 PRINT X$ 

110 & LEFT$ (X$) 

115 PRINT 

120 & RIG4T$ (X$) 



O.S.I. C IP, C4P&C8P 
TRS-80 Models I & III 

The Roam's a* Cygnes IV 

You are in a rnoi with walls placed randoaly throughout. There are 

three to ten ROBOTS bent on destroying you with laser fire or by 

touching you. You lost destroy all the robots in a root to advance a 

level. The higher the level the faster the robots. MATCH-OUT the walls 

are electrified 1 ! There are two still levels, 

D.S.I. MP h CBP - Color, Sound fc Joysticks BK Cassette - 19.95 

Trs-80 I \t III Sound both 32K cassette and 32K disk version- $12.95 

Murder Mansion - Adventure #1 

You and seven other people are exploring a three story house for a 

treasure. HATCH-OUT!! Soieone has decided to get a little greedy and 

is killing the others. ¥ou could be NEITH 

Trs-80 version has a graphic representation of each rooi!!! 

O.S.I. C1P, E4P t CSP - 8K Cassette - (12.95 

Trs-80 I fc III (Graphics) 32K Cassette and m Disk version - (16.95 

Blaster Attack 

This is a two player gaie where you have to protect your country froi 
overhead spv-craft. Von and your opponent lust shoot down as tany 
enery craft with vour LASEfl-BASE before your ti«e runs out. Excellent 
sound and graphics. You can play the coaputer or a hunan opponent. 
You both will use the sa»e playing field at the saie tiie!M 
O.S.I, CAP fc CBP - Sound BK Cassette - 47.95 

Novastar 

You are a lone warrior on a seek and destroy lission. You've been sent 

to ALDEBERQN to destroy 4 CYCLON fuel stations which are protected by a 

CYCLON fighter sqadrcn. You hill have 5 oldstyle nuclear warheads to 

destroy the stations. At the sa»e tiie you will have to dogfight the 

CYCLON figtters!!!! 

O.S.I. CAP I CBP - Color t Sound Bk Cassette - 16-95 

Bunkers 

This is a two player gaie in which you lust destroy 5 of your opponents 
bunkers by shooting over a rugged reuntain. You control your iuzzle 
velocity and barrel angle. Great COLOR graphics and sound. 
O.S.I. CAP i CBP - Color tr Sound BK Cassette - (7.95 



Send $1.00 for catalog 

COMP-U-GAMER SOFTWARE 

P.O. Box 802 

Nevada, Missouri 64772 
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COMMUNICATE! 



The 



from 




for 



NEW Apple II terminal software 

• Z-Term "The Professional"™ by Bill Blue, 
Apple CP/M* 

• P-Term "The Professional"™ by Joel Kunin and 
Bill Blue, for Apple Pascal** 

• ASCII Express "The Professional"™ by Mark 
Robbins and Bill Blue, for Apple DOS** 

Businessmen 

Q. Do you have difficulty operating your printer when 
connected to a time-sharing computer? Are files 
you're trying to download too large for your system 
buffer? Does your host computer lose data when you 
send files to it? 

A. "The Professionals" incorporate printer ring buffers 
which allow slower printers to accept data at their 
own rates. Very large files are easily received by 
periodically saving the buffer to disk. Unlike some 
software which can lose data during disk saves, 
"The Professionals" not only direct the host to stop, 
but actually wait for it to respond before performing 
the save. After a successful save, the host is 
automatically directed to continue. This process 
may be repeated indefinitely. Lost data during send 
is virtually eliminated by the widest variety of send 
options available in any communications software. 
"The Professionals" ensure fast, reliable data trans- 
fer of any valuable business information. 



Authors 



Q. Does your line of work involve sending written 
material to others? Are you a program author who 
would like to send work in progress to a partner or 
client and know that it arrived intact? What would 
the ability to instantly send material or programs to 
anyone at any time be worth to you? 

A. "The Professionals" provide the ideal way to send 
your articles, manuscripts, reports, programs and 
technical documents to another computer with 
phone line access. Now you can work WHEREVER 
you want, and be assured that your data is sent to its 
destination quickly and error-free. In fact, compared 
to the fastest mail services, "The Professionals" of- 
fer immediate delivery and will save you the pur- 
chase price in just a few uses. 



Students 



Q. Are you bothered by limited access to your school's 
existing terminals? Would you like to be able to do 
your school assignments at home at your own con- 
venience? 

A. "The Professionals" allow you to access virtually 
any dial-up school or college computer system over 
standard telephone lines. This means no more 
waiting in line for an available terminal or hassles 
with malfunctioning school equipment. You can 
even prepare term papers or reports while off-line 
and send the completed work to the school com- 
puter for final printing. Best of all, you can work from 
home at the times most convenient for you. 



*CP/M is a trademark of Digital Research. 
**Apple is a trademark of Apple Computers, Inc. 



Time Share Users 

Q. Are you tired of wasting time and money sending or 
receiving files with inadequate, poorly designed 
software? Do you find yourself manually performing 
the same lengthy log-in procedures over and over 
again? Would you like to automate these procedures 
for yourself and others? 

A. "The Professionals" allow you to send files which 
have been prepared in advance. They may then be 
transferred at any time, as quickly as possible — 
even to several different systems. No time is 
wasted reviewing information while on line; data may 
be captured by your computer or printer (or both) to 
be evaluated later at your convenience. These fea- 
tures assure minimum on-line time and therefore 
minimum on-line cost. 

"The Professionals" introduce macros that are more 
sophisticated than anything previously seen in com- 
munications software. These "hand-shaking" mac- 
ros allow you to perform complete multi-stage log-on 
sequences automatically; all you do is specify the 
system to be called. This eliminates sign-on errors 
and greatly simplifies operation of the entire system, 
not only for you, but for other less skilled operators. 

Bulletin Boards 

Q. Would you like to be able to take advantage of the in- 
formation featured on local bulletin boards and infor- 
mation services such as The Source, CompuServe, 
Dow Jones, and others? 

A. "The Professionals" open the world of modem com- 
munication networks to you. There are already 
thousands of these systems and networks in use na- 
tionwide. "The Professionals" provide an ideal way 
of accessing these systems. All 80 column boards, 
external terminals (even the 40 column screen), and 
currently available communications devices are fully 
supported, including the Hayes Micromodem II and 
Novation Apple CAT. All standard baud rates — 110, 
300, 1200 and others — are fully supported; BAUDOT 
too, if your computer is equipped with the Apple CAT 
modem. 



Clubs 



Q. Are there other Apple owners with whom you would 
like to exchange programs or files, but have been 
unable to do so because of limitations imposed by 
the software you now use? 

A. Any two Apples equipped with "The Professionals" 
can transfer ANY type or size file with complete error 
checking and correction. All of "The Professional" 
packages are fully conversant with each other and 
operate almost identically. For the first time ever, 
you can transfer compatible files to an operating 
system different from yours — error free! 

"The Professional" Series 

Communications Software 



Excellence in Apple 




soutnuuesteRn 
data svstems™ 



P.O. Box 582-M Santee, CA 92071 714-562-3670 
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Low-Resolution Graphics 
for Apple Pascal 



by Richard C. Vile, Jr. 



This article and accompanying 
programs will provide a method 
for accessing Apple's low- 
resolution capabilities from 
Apple Pascal. 



Requires 

Apple II or Apple II Plus 
with Apple Pascal 

An Apple II feature absent in Apple Pas- 
cal is low-resolution graphics. Although 
many users may not miss lo-res graph- 
ics, I certainly did. I decided to see 
what could be done. The results of my 
efforts are presented in this article. 

Desirable Low-Resolution 
Capabilities 

If low-resolution capabilities are to 
be provided in Pascal, we must add new 
procedures and functions. A reasonable 
list resembles the features found in 
BASIC: 

PROCEDURE plot(row,col:INTEGER); 
PROCEDURE hline(coll,col2,row: 

INTEGER); 
PROCEDURE vline(rowl,row2,col: 

INTEGER]; 
PROCEDURE setcolor(c:INTEGER); 
PROCEDURE grclear; 
PROCEDURE grcltop; 
PROCEDURE setlow; 
PROCEDURE settext; 
FUNCTION scrn(row,col:INTEGER): 

INTEGER; 



Most of these capabilities are 
already present in Apple's Monitor 
ROMs, Therefore, it would seem that 
we could simply use the Pascal 6502 
macro assembler to create a code file 
containing the appropriate parts of the 
monitor. Then we could link that file 
to whatever high-level Pascal code we 



create to use the low-resolution fea- 
tures. This idea is feasible in principle, 
but it needs a little remodeling to put it 
to work. 

The assembly code in listing 1 pro- 
vides the capabilities listed above in 
the form of Pascal EXTERNAL pro- 
cedures and functions. You need to 
assemble that listing using the assem- 
bler in the language system. This will 
produce a code file, which we will call 
LOWRES.CODE here, but you can call 
it whatever you like. Listing 2 presents 
a typical Pascal program that uses the 
lo-res features. Notice that the pro- 
cedures and functions are declared at 
the beginning of the program as EX- 
TERNAL. You will need to duplicate 
these declarations in any of your own 
programs that use LOWRES.CODE. 

Suppose that the program of listing 
2 were compiled and a code file named 
VIDEO. CODE were produced. It would 
be necessary to link the code files LOW- 
RES.CODE and VIDEO. CODE together 
to produce a useable Pascal program. 
To do this, you must invoke the Pascal 
linker program (after putting both code 
files on the disk containing the linker) . 
The dialogue which will ensue should 
look as follows: 

LINKER II. 1 [A4] 
HOST FILE? VIDEO 
OPENING VIDEO. CODE 
LIB FILE? LOWRES 
OPENING LOWRES.CODE 
LIB FILE? 
MAP FILE? 
READING VIDEO 
READING IROUTINE 
OUTPUT FILE? DEMO 
LINKING VIDEO #1 
COPYING PROC IROUTINE 
COPYING PROC PLOT 
COPYING PROC HLINE 
COPYING PROC VLINE 
COPYING FUNC SCRN 
COPYING PROC SETCOLOR 
COPYING PROC GRCLEAR 
COPYING PROC GRCLTOP 
COPYING PROC SETLOW 
COPYING PROC SETTEXT 



The PROCs and FUNCs that are in- 
dicated as being copied are all those 
which you declare as EXTERNAL in 
your Pascal host program. If you don't 
use a particular PROC or FUNC, then 
don't declare it. Otherwise it will clut- 
ter up your program. 

The Nature of EXTERNAL 
Procedures in Apple Pascal 

To call assembly code from Apple 
Pascal programs, the code must resem- 
ble either a procedure or a function to 
the caller (or host as it is referred to in 
the manuals). This means that the 
assembly code must have a .PROC or 
.FUNC declaration surrounding it. 
Otherwise, the language system assem- 
bler detects a syntax error. 

If an external routine is called from 
a host and parameters are passed to it, 
they will be transmitted on the 6502 
stack. This means that pre-existing 
code, such as the lo-res routines from 
the monitor that expect parameters in 
registers, may not be called directly by 
a host program. That is, if we simply 
put a .PROC declaration in front of the 
code and call it from Pascal, it is not 
going to operate correctly because it 
won't get its parameters as expected. 

To remedy this situation, write in- 
terface routines, which the Pascal host 
program can call. Their only job is to 
take the parameters passed on the 
stack, rearrange them into the appro- 
priate registers, and call the pre-exist- 
ing code. Figure 1 illustrates this idea. 



To clarify the schematic explana- 
tion of figure 1, we consider the EX- 
TERNAL procedure PLOT. It takes two 
arguments; namely, row and col, both 
of type INTEGER. The Pascal compiler 
generates code that causes the argu- 
ments to be passed on the stack, both 
occupying two bytes. Figure 2 il- 
lustrates the configuration of the 6502 
stack when the routine PLOT is 
entered. Notice that the return address 
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to the Pascal calling routine occupies 
the top two bytes. The assembly code 
must save this address. Later it will be 
restored to the stack top so that the 
RTS instruction ending the PLOT pro- 
cedure gets back to the caller. The 
macros POP and PUSH have been in- 
cluded for this purpose. 

After POP is invoked to store the 
return address, the two parameters are 
exposed. As pointed out above, they 
both occupy a full word (two bytes). 
However, in both cases only the low 
byte of the word argument is signifi- 
cant. This explains the need for the ex- 
tra PLA instruction to process each 
parameter. Figure 3 shows what hap- 
pens as the parameters are rearranged. 
After putting row and col into the ap- 
propriate 6502 registers, PLOT simply 
does a JSR to the internal plot routine, 
which we have called IPLOT. IPLOT is 
identical to the monitor PLOT routine, 
which expects its inputs in the A and Y 
registers. 

Summary 

We have presented assembly code 
that allows a Pascal user to access the 
Apple II low-resolution graphics 
capabilities. The implementation il- 
lustrates the use of the 6502 assembler 
in the language system. It also shows 
the need for interface routines when 
trying to use assembly code that ex- 
pects parameters to be passed in 
registers. Finally, it illustrates the use 
of the linker program in the language 
system in order to tie the assembly 
code and the Pascal host code together. 

If you want to extend the capabil- 
ities presented here, you should at- 
tempt to add other procedures and 
functions. One obvious feature (miss- 
ing in BASIC) is a procedure, SET- 
FULL, that will select full-screen low- 
resolution graphics. Other possibilities 
might involve procedures that produce 
more complex graphics elements than 
points or lines. For example, you could 
add BLOCK(coll,col2,rowl,row2:IN- 
TEGER); which draws a solid block 
with the boundaries indicated. 



Contact Richard Vile at 3467 Yellowstone 
Drive, Ann Arbor, Michigan 48105. 



Host Code 



Assembly Code 



Pascal Source Program 



Low-Res 
functions 
and 
procedures 



T^ in 



Declared as EXTERNAL 
Pascal Host 



call to EXTERNAL 

low-resolution 

feature 



.PROC 



Interface procedure. 
Takes parameters 
passed on the stack 
(from Host program) 
and rearranges them 
in appropriate 
registers (as 
expected by the 
"internal" routines) 




Figure 1 



Internal routines. 
Assembled as one targe 
.PROC with several 
entry points declared. 
There is one entry 
point for each 
interface routine. 



Figure 2 



RETURN ADDR (LOW) 



RETURN ADDR (HIGH) 



COL (LOW BYTE) 



COL (HIGH BYTE) 



ROW (LOW BYTE) 



ROW (HIGH BYTE) 




A (DISCARD) 



-^•0 



STACK 



Figure 3 



. 
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Listing 1 



; low resolution routines "stolen" -from the ram monitor 



; set up page zero temporaries matching the original 
; apple DC system monitor definitions of the graphics 
; locations. 



GBASL 


.EQU 


26 


GBASH 


.EQU 


27 


H2 


.EQU 


2C 


V2 


.EQU 


2D 


MASK 


.EQU 


2E 


COLOR 


.EQU 


30 


GRAPHIC 


.EQU 


0C050 


TEXTMOD 


.EQU 


0C051 


FULLSCR 


.EQU 


0C052 


MIXED 


.EQU 


OC053 


LORES 


.EQU 


0C056 



define the macros push and pop which are used in all 
the pascal external routines to save and restore 
the pascal return address. 



.MACRO PUSH 

LDA 7.1 + 1 

PHA 
LDA 7.1 
PHA 

.ENDM 

. MACRO POP 

PLA 
STA 7.1 
PLA 
STA 7.1 + 1 



.ENDM 



first duplicate the code for low resolution graphics 
routines from the rom monitor. these routines are 
the "internal" routines to be called from the pascal 
external interface routines which set up the 
parameters passed from above. 



.PROC I ROUTINES 

.DEF IPLOT, IHLIN. IVLIN 

•DEF IBRCLEAR, ICLEAR, ISCRN 

. DEF GBASCALC, ISETGR, ITEXT 

.DEF IWAIT, ISETCOL 



I PLOT 


LSR 
PHP 


A 






JSR 


GBASCALC 




PLP 








LDA 


#0F 






BCC 


RTMASK 






ADC 


#0E0 




RTMASK 


STA 


MASK 




PLOT! 


LDA 


3GBASL 


Y 




EOR 


COLOR 






AND 


MASK 






EOR 


3GBASL 


V 




STA 


9GBASL 


Y 




RTS 






IHLIN 


JSR 


IPLOT 




HLINE1 


CRY 


H2 






BCS 


RTS1 






INY 








JSR 


PL0T1 






BCC 


HLINE1 




VLINEZ 


ADC 


#01 




IVLIN 


PHA 








JSR 


IPLOT 






PLA 








CMP 


V2 






BCC 


VLINEZ 




RTS1 


RTS 







IGRCLEAR LDY #2F 

BNE CLRSC2 

ICLEAR LDY #27 
CLRSC2 STY V2 
LDY #27 

CLRSC3 LDA #0 

STA COLOR 

JSR IVLIN 

DEY 

BPL CLRSC3 

RTS 



Listing 1 (Continued) 




GBASCALC PHA 






LSR A 






AND #03 






ORA #04 






STA GBASH 






PLA 






AND #18 






BCC 8BCALC 






ADC #7F 




I GECALC 


STA GBASL 
ASL A 
ASL A 
ORA GBASL 
STA GBASL 
RTS 




ISCRN 


LSR A 

PHP 

JSR BBASCALC 

LDA aGBASLjY 

PLP 




SCRN2 


BCC RTMSKZ 
LSR A 
LSR A 
LSR A 
LSR A 




RTMSKZ 


AND #OF 
RTS 




ISETCOL 


AND #OF 






STA COLOR 


■" 




ASL A 






ASL A 






ASL A 






ASL A 






ORA COLOR 






STA COLOR 






RTS 




ISETGR 


LDA GRAPHIC 
LDA LORES 
LDA MIXED 
JSR ICLEAR 
RTS 




ITEXT 


LDA TEXTMOD 
LDA .FULLSCR 

LDA #OAO 

JSR ICLEAR 
RTS 




IWAIT 


SEC 




WAIT2 


PHA 




WAIT3 


SBC #01 
BNE WAIT3 
PLA 

SBC #01 
BNE WAIT2 
RTS 




; now 


finally the code 


for the external routines. 


: each 


routine is resp 


onsible for picking up the 


; parameters from the 


stack and calling the parallel 


; internal routine. 

. ._. . 






; plot- 






.PROC PLOT, 2 


; PROCEDURE PLOT (ROW, COL a INTEGER) a 




.REF IPLOT 




RETURN 


. EQU 
POP RETURN 

PLA 






TAY 


:C0L ARGUMENT 




PLA 


[DISCARD MSB OF ARGUMENT 




PLA 






TAX 






PLA 


: DISCARD MSB 




TXA 


; RESTORE ROW ARGUMENT TO A-REG 




JSR IPLOT 


j CALL INTERNAL ROUTINE 




PUSH RETURN 






RTS 


; RETURN TO PASCAL CALLER 




a H L I N 


E 




.PROC HLINE.3 


S PROCEDURE HLINE(C0L1,C0L2,R0W: INTEGER) ; 




.REF IHLIN 


(Continued) 
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Listing 1 (Continued) 




RETURN .EQU 







PGP 


RETURN 




PLA 






TAX 




SAVE ROW IN X-REB 


PL. A 




DISCARD HIGH BYTE OF ARG. 


PLA 




GET ENDING COLUMN 


STA 


42 


SAVE IN PAGE ZERO TEMP 


PLA 




TOSS H.B. 


PLA 




GET STARTING COLUMN 


TAY 




PUT IN Y-RE6 


PLA 




TOSS H.B. 


TXA 




PUT ROW BACK IN ACC 


JSR 


EHLIN 


CALL INTERNAL ROUTINE 


PUSH 


RETURN 




RTS 






; v 


L * I N E 




.PROG VLINE.,3 


PROCEDURE YLINE<R0W1,R0W2,C0L: INTEGER) ; 


.REF 


IVLIN 




RETURN . EQU 







PDP RETURN 




PLA 




GET COLUMN 


TAY 




ITS EXPECTED IN Y-REG 


PLA 




DICARD H.B. OF ARG 


PLA 




GET ENDING ROW 


STA V2 


PUT IN PAGE ZERO TEMP 


PLA 




TOSS H.B. 


PLA 




GET STARTING ROW 


TAX 






PLA 




TDSS H.B. 


TXA 




ROW INTO ACC 


JSR 


VLIN 


CALL INTERNAL ROUTINE 


PUSH 


RETURN 




RTS 




FUNCTION SCREEN (ROW, COL: INTEGER) : INTEGER; 


? s 


CRN 


.FUNG SCRN.2 


.REF 


ISCRN 




RETURN . EQU 


o 




POP RETURN 




PLA 






PLA 






PLA 






PLA 




DISCARD 4 BYTES FOR FUNCTIONS 


PLA 






TAY 




COLUMN 


PLA 






PLA 




ROW 


TAX 






PLA 






TXA 






JSR ISCRN 




TAX 




SAVE RESULT 


LDA #00 




PHA 




PUSH MSB = 


TXA 






PHA 




RESULT FROM ISCRN 


FUSH 


RETURN 




RTS 






5 S 


E T C 


L O R 


.PROG SETCOLOR, 1 




.REF 


ISETCQL 




RETURN .EQU 







PDP RETURN 




PLA 






TAX 






PLA 




DISCARD MSB 


TXA 






JSR 


IBETCOL 




PUSH 


RETURN 




RTS 




RETURN TO PASCAL CALLER 



Listing 1 


(Continued) 




; G R C L E A R ' 




.PRDC GRCLEAR ; PROCEDURE GRCLEAR; 




.REF IGRCLEAR 


RETURN 


. EQU 




PDP RETURN 




JSR IGRCLEAR ; CALL INTERNAL ROUTINE 




! NO ARGUMENTS TO SET UP 




PUSH RETURN 




RTS 




; GRCLRTOP 


. PROC GRCLTOP ; PROCEDURE GRCLTOP 




.REF I CLEAR 


RETURN 


. EQU 




PGP RETURN 




JSR ICLEAR ;CALL INTERNAL ROUTINE 




PUSH RETURN 




RTS 




5 S E T L W 




.PROC SETLQW } PROCEDURE SETLOW; 




.REF ISETGR 


RETURN 


. EQU 




PDF' RETURN 




JSR ISETGR 




PUSH RETURN 




RTS 




; S E T T E X T 




.PROC SETTEXT ; PROCEDURE SETTEXT 




.REF ITEXT 


RETURN 


. EQU 




POP RETURN 




JSR ITEXT 




PUSH RETURN 




RTS 




.END 


Listing 2 




(^t*$*^^t*********$*t**$************t*t) 


<* 


*> 


(* 


v i d . e o *) 


(* 


*) 


(* program to test the pascal low *) 


(* resolution graphics inter-face to #) 


(* assembly routines. #) 


(* 


*) 


(tt^*t****t*t**************************) 


PROGRAM 


vi deo; 


USES applestu-ff; 


CONST 




lores 


-16298; 


graphics - -16304; 


mixtex 


t = -16301; 


all text -16303; 


fullscreen -16302; 


color 


48; 


escape - 27; 




(Continued) 
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Listing 2 (Continued) 
VAR 



colors: 


0..15; 


location: 


INTEGER; 


rl, 




r2, 




cl. 




c2s 


INTEGER; 


width. 




which, 




i s 




j: 


INTEGER; 


ch: 


CHAR; 


downs 


BOOLEAN; 



PROCEDURE plot (row, col: INTEGER) ; EXTERNAL; 

PROCEDURE hi ine (col l„col2, row: INTEGER) ; EXTERNAL; 

PROCEDURE vline(rowl,row2,cols INTEGER) ; EXTERNAL? 

PROCEDURE setcolor (c: INTEGER) ; EXTERNAL; 

PROCEDURE grclear; EXTERNAL; 

PROCEDURE grcltop; EXTERNAL; 

PROCEDURE set low; EXTERNAL; 

PROCEDURE settext; EXTERNAL; 

(jit*************************************) 

(* r n d *) 

(***3M*********************************> 

FUNCTION rnd (a,bs INTEGER) : INTEGER; 
BEGIN 



rnd 



a + random MOD (b 



a + 1); 



END (* FUNCTION rnd *>; 

(**3M**:M*******>I^***)M*)M ****** *******) 
(* t i c t a c *) 

(ft************************************) 

PROCEDURE tictac (v: INTEGER) ; 
BEGIN 

hline(0,39, v) ; 

hline<0,39,39-v>; 

vline(0,39, v) ; 

vline(0,39,39-v>; 

END (* PROCEDURE tictac *); 
(ft************************************) 
(* quadtac *) 
(ft*************************************) 

PROCEDURE quadtac (v: INTEGER) ; 
BEGIN 

hline(0,39,v) ; 

hline(0,39,39-v) ; 

vline(0,39,v) ; 

vline(0,39,39-v) ; 

hline(0,39,20+v) ; 

hline(0,39, 19-v) ; 

vline(0,39,20+v) ; 

vline(0,39, 19-v) ; 
END; 

BEGIN 

writeC input width* aea »>* ) ; 
readln (width) ; 

set low | 
randomize; 

ch i- ' 'i 
i a« 0; 
down s* true; 

setcolor (8) ; 

WHILE ch <> chr (escape) DO 
BEGIN 



Listing 2 (Continued) 

IF rnd (O, width) =0 

THEN 

BEGIN 

which := rnd(0, 15) ; 

setcolor (which) ; 
END; 

IF down 

THEN 

BEGIN 

quadtac (i ) ; 

i s« i + i; 

IF i = 20 

THEN 

down := false 

(* endi-f *) ; 
END 
ELSE 
BEGIN 

i s — i — 1 ; 

quadtac (i ) ; 

IF i - 

THEN 

down : * true 

(* endif *); 

END (* IF down *) ; 

IF keypress 

THEN 

read (ch) 
(* endif *) ; 



END (* WHILE ch <> chr (escape) *); 

settext; 
END. 



AMOK) 



M.P. Computer Services Corporation 

2396 Encinal Station 

Sunnyvale, California 94087 

(408) 735-0871 



S P.F.S.II "NEW IMPROVED" 

= P.F.S. REPORT 

5 P.F.S. GRAPH "NEW" 

w (Interfaces with P.F.S. and VisiCalc) 

fir VISICALC 3.3 

- VISITERM 
S VISIDEX 
» VIS! PLOT 

- SUPER DISK COPY II 
» PRO EASYWRITER/MAILER COMBO 
S EASYSPELLER 
ij THE DICTIONARY 

- CREATIVE FINANCING 
5 REAL ESTATE ANALYZER II 
5 THE BOOKKEEPER MASTER 
= THE HOME ACCOUNTANT 
= TYPING TUTOR II 
S SUPER DISK COPY III 
S APPLE 21 
5 CRAPS 
5 CROSSFIRE 
E SABOTAGE 
<£ THREE MILE ISLAND 
= STAR THIEF 

i Hardware 

1 EPSON MX 80 PRINTER 

m EPSON MX 100 PRINTER 

• OKI DATA 82A PRINTER 

5 OKI DATA 83A PRINTER 

5 PROMETHEUS VERSAcard 

= 16K RAM CARD 

55 AMDEK VIDEO 100 MONITOR 

S AMDEK VIDEO 300 MONITOR 

fii AMDEK COLOR I MONITOR 

*» Send check or money order. CA residents add 6% sales tax. Add $2.00 Sj 
55 for postage. All items subject to availability. Send $.50 for our catalog or a 3 
5 tree catalog with your order. Sj 



Retail 


Your Price 


$125.00 


$ 96.00 


95.00 


74.00 


125.00 


96.00 


250.00 


225.00 


100.00 


80.00 


250.00 


195.00 


200.00 


158.00 


30.00 


25.00 


300.00 


225.00 


175.00 


137.00 


99.50 


74.00 


195.00 


143.00 


195.00 


143.00 


89.95 


66.00 


74.95 


60.00 


24.95 


19.95 


30.00 


26.00 


24.95 


21.95 


24.95 


21.95 


29.95 


24.97 


24.95 


21.95 


39.95 


33.97 


29.95 


23.97 


599.00 


525.00 


995.00 


799.00 




510.00 




799.00 


199.00 


167.00 


169.00 


105.00 


179.00 


117.00 


249.00 


208.00 


449.00 


384.00 
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X 




PET/CBIVT 

2000/3000/4000 Series 

not using a CRT, or display controller chip 

$275.00* 



Select either 
SO x 25 on 4Q x S5 



On The 
Built-in 
Display 



From the keyboard or program 

Displays the full, original character set 

Available from your local dealer or: 
EXECOM CORP. 

1901 Polaris Ave. 
Racine, Wl 534Q4 
Ph. 41 4-632-1 004 

• Plus installation change of $75.00 



Available only for Basic 3.Q & Basic -4.0 

PETS CBM™a 

trademark of Commodore Business Machines 



RPL 




RPL is a fast, space-efficient lang- 
uage, designed for the PET/CBM user who wants to 
develop high-speed, high-quality software with a minimum of effort. 
While ideal for programming games and other personal 
applications, it is primarily oriented toward real-time process 
control, utility programming, and similar demanding business and 
industrial uses. 

R. Vanderbilt Foster, of Video Research Corporation, says he 
thinks that "RPL is one HELL of a system!" (capitals his). Ralph 
Bressler, reviewing the package in The Paper, says "I know of few 
language systems this complete, this well documented, for this kind 
of price." For more information, see the following: 

MICRO, Dec. 'SI, p. 35 

MICROCOMPUTING, Feb. '82, p. 10 

MICRO, Mar. '82, p. 29 

BYTE, Mar. '82, p. 476 

COMPUTE!, Mar. '82, pp. 45, 120. 
See also the article "Basic, Forth and RPL" in the June '82 
issue of MICRO, and Mr. Bressler's review in the Jan./Feb. '82 issue 
of The Paper. Don't let our prices deceive you: RPL is a first-class, 
high performance language in every respect. We are keeping its 
price so low in order to make it accessible to the widest possible 
number of users. Only $80.91, postpaid, for both the RPL 
compiler and its associated symbolic debugger, complete with full 
documentation (overseas purchasers please add $5.00 for air mail 
shipping). Versions available for PET-2001 (Original, Upgrade or 
V4.0 ROM's), CBM 4032, and CBM 8032/8096, on cassette, 
2040/4040, and 8050 disk. 

Order Anytime, Day or Samurai Software 
VI c A Night 7 Days A Week P.O. Box 2902 

J^ aaa rftrfcpv cm*** w Pompano Beach, 

Master Charge 800-327-8965 Florida 33062 



American Express 



(ask for extension 2) 



(305) 782-9985 



64K RAM for AIM-65 and SYM-f from 
BYTE MICROSYSTEMS 



AT LAST, ENOUGH MEMORY TO GET THE JOB 
DONE RIGHT! AND AT THE RIGHT PRICE! ! 



• EASY, PLUG-IN INSTALLATION 

• NO SOLDERING REQUIRED 

• APPEARS AS 2 MEMORY BANKS, 
EACH 32K BYTES LONG 

• OCCUPIES ADDRESS RANGE 0000- 7FFF 

• DESIGNED FOR COMPATIBILITY WITH 
ALL AIM AND SYM PROGRAMMING 
LANGUAGES, AND WITH BYTE-DOS 
AIM-65 DISK SYSTEM* 

• ALL ADDRESS AND DA TA LINES 
FULLY BUFFERED 

• USER UPGRADABLE TO ADD 
PIGGYBACK COLOR VIDEO GRAPHICS 
BOARD (SOON TO BE RELEASED) 



SPECIAL INTRODUCTORY PRICE 



399 



00 



(Effective 9/1/82 will be $475.00) 

Includes assembled, tested board, 
connectors and complete instructions. 
Dealer inquiries invited. 




IPiJe 



BYTE MICROSYSTEMS 



1477 ELKA AVENUE, SAN JOSE, CA 951 29 



BYTE-DOS $499 SYSTEM INCLUDES DISC CON- 
TROLLER CARD, TEAC FD-50A DISC DRIVE 



SEND ME THE FULL STORY! 


: Name 






! Hnrnpany 


■ Address _ 


: Citv 


State 


Zip : 


Tplpphnnp 




D home '. 
D work 



AIM-65 is « trademark of Rockwell International 
SYM-1 is a trademark of Synertek Systems Corp. 
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POWER — A Flexible ROM Utility 
Package 

In the May PET Vet I discussed the 
many virtues of the PET's system for 
editing BASIC programs. However, 
there are a few deficiencies, which have 
been left for the user to correct or put 
up with. An early cure for some of these 
ills was the Programmer's Toolkit 
ROM from Palo Alto Integrated Cir- 
cuits. For good reasons, it was instantly 
very popular and it remains so. It pro- 
vides auto-numbering, renumbering, 
delete, search, dump, and trace func- 
tions. Lately, larger and more powerful 
utility packages have been introduced, 
which provide these and other capa- 
bilities. POWER from Professional 
Software combines some very unusual 
and powerful features with an excellent 
set of editing, testing, and debugging 
commands. 

Editing Enhancement 

The editing commands in POWER 
include AUTOnumber, RENumber, 
and DELete. The renumber command 
allows you to renumber any part of 
your program or the whole thing. 
POWER adds repeating cursor keys (to 
those machines that don't already have 
them) and a handy list scrolling 
feature. 

Testing and Debugging Aids 

Another group of commands help in 
testing and debugging. There are 
powerful search and search-and-replace 
commands. You can have either com- 
mand act on only the first occurrence of 
the search string (with an easy repeat), 
or you can have the command operate 
globally. In addition, you can enable 
special characters called meta- 
characters. These, when included in 
your search string, indicate that you 
don't care about a particular character 
or series of characters. 

POWER has a TRaCe command, 
which you can select to operate on 
several levels. The most complete ver- 
sion displays each BASIC line number, 
its contents, and the values of variables 
as they are assigned. By holding down a 



single key you can quickly trace 
through parts of your program, and 
then single step by pressing the key 
only once for each line. 

The DUMp command displays the 
values of all non-array variables. WHY 
indicates the cause of an error by high- 
lighting the part of the BASIC line that 
caused a run-time error. 

The features described so far are 
essentially the same (with improve- 
ments) as those included in the Pro- 
grammer's Toolkit. The remaining 
features are really what distinguish 
POWER from the Toolkit and the many 
other utility packages now available. 

Instant Keywords, Phrases, and 
Subroutines 

At some point you probably learned 
that instead of typing out long BASIC 
keywords like VERIFY, RESTORE, 
RETURN, and COLLECT, you could 
get away with typing only the first one 
or two letters followed by the next one 
shifted. With POWER, if you select the 
instant keyword feature, nearly every 
key, when shifted, causes a BASIC 
keyword to be spelled out on the 
screen. For instance, shift-B is GOSUB, 
shift-L is LIST, and shift-R is RETURN. 

You can, however, redefine any of 
these keys to produce "instant 
phrases." These are defined in special 
REM statements that you enter in your 
program (and delete when you're 
through with them) . To assign a phrase 
meaning to the shifted W you would 
enter a line in your program such as: 

1 REM"W = GOSUB5000:X= -1 

This would cause "GOSUB 5000: 
X= - 1" to be displayed on the screen 
every time you type a shifted W. Of 
course you can reassign as many keys 
as you want, and the others will retain 
their original keyword meaning. 

The final "instant" feature is in- 
stant subroutines. These are defined in 
a similar way to instant phrases. The 
subroutine, which must exist in your 
current program, is executed when the 
appropriated shifted key is typed. 
Unlike instant phrases, instant sub- 
routines can include GET and INPUT 



commands, and of course they can in- 
clude more than one line. There are 
lots of possibilities for instant sub- 
routines, such as generating an array 
dump. 

You can customize your keyboard 
to include an appropriate balance of in- 
stant keywords, phrases, and sub- 
routines. If you need to use the shifted 
keys as they were originally intended, 
it is a simple matter to disable the in- 
stant features. 



The XEC Command and Others 

The XEC command transfers con- 
trol to a PET sequential file. The lines 
of the file are executed as if they were 
typed in from the keyboard. The most 
obvious application of this command is 
to merge programs or subroutines that 
have been stored as sequential files. 

There is an OFF command to com- 
pletely disable POWER and restore the 
PET's pointers and CHRGET routine to 
their normal states. The SEL command 
is used to enable and disable instant 
keywords, phrases, and subroutines; 
meta-characters in the search and 
search-and-replace commands,- and the 
various options for the TRC command. 
An MLM command performs a call to 
the resident monitor, as opposed to the 
break entry caused by SYS4 or SYS 
1024. A break disturbs the stack, while 
a call leaves it untouched. Finally, 
there is a FIX command, which resets 
POWER'S features to their default con- 
ditions and restores any BASIC 
pointers that may have been disturbed. 

Machine Language and 
Documentation 

Many of POWER'S features work 
just fine outside BASIC. For instance, 
you can set up an instant phrase such as 
"S,01,TEST,033A,035F" and a single 
keystroke will enter that after the 
monitor prompt. No mention is made 
of this in the manual, so this kind of 
POWER application is definitely at 
your own risk! 

The documentation (by Jim Butter- 
field) is generally excellent. It explains 
the operation of most of the commands 
well, although it falls a little short in 
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explaining the XEC command. An ex- 
ample or two of XEC command opera- 
tion would be a real help. Quite a bit of 
effort is made to point out quirks and to 
remind you of things you might 
overlook. 

Where the manual really shines is 
in documenting the workings of 
POWER beyond the user's level. All 
RAM locations used are listed with 
their functions. Several internal 
machine-language routines, which can 
be used by the programmer, are docu- 
mented. Also, the process of adding 
commands to POWER is explained, as 
is altering the entire command table. 

What Doesn't It Do? 

Other things you might expect of a 
utility package are: PRINT USING, a 
sound command, hex/decimal and 
decimal/hex conversion, screen dump, 
listing a sequential file, a merge that 
uses program rather than sequential 
files, and spooling of files from the disk 
to a printer. PRINT USING and sound 
commands require that the PET's com- 
mand interpreter be intercepted during 
program operation. This slows down 
the operation of BASIC, and requires 
program is used. If you do require either 
the chip to be present whenever the 



of these, you can add them yourself as 
machine- language routines. The other 
commands can be added to POWER 
pretty easily as instant subroutines or 
whole new commands. In fact, they 
already have been. Next month we pre- 
sent POWER-Aid, a collection of rou- 
tines designed to complement POWER. 

Recommendations 

Because of its flexibility, POWER 
stands above any other single utility 
package. You have control of how just 
about everything works. If you need a 
special function, and you can't do it 
with an instant phrase or subroutine, 
then you can add a new command. 

At $89.95, POWER is an excellent 
value. However, if this seems too steep 
to you, perhaps the Programmer's 
Toolkit ($40) has enough of what you 
need. B ASIC-Aid (available through 
most users' groups) is free, and it may 
offer enough to meet your needs if you 
can afford the loss of 10K of RAM. SYS- 
RES from Cansoft Data Inc. has many 
interesting features, and it will be 
reviewed in MICRO in the near future. 
It, too, is RAM-dependent. 

POWER is available from Profes- 
sional Software (51 Fremont Street, 
Needham, MA 02194) and from 
dealers. It was written by Brad 
Templeton - to occupy 4K of ROM at 



$9000. There are three different ver- 
sions: 4030 for upgrade 40-column, 
4040 for 4.0 40-column and 8040 for 

80-column.. 

Commodore to Introduce New 
Generation of Computers 

At a recent show in Germany, Com- 
modore exhibited prototypes of its new 
line of computers to be introduced on 
the market in the fall. The PET II is a 
128K color computer that hooks up to a 
TV or monitor. The CBM II is a 256K 
computer that will include a black and 
white 80-column monitor and two 5 Va " 
disk drives. An 'X' option will be of- 
fered which includes the 16-bit capabil- 
ity of an 8088 processor. In addition, a 
Z-80 option will be available to provide 
access to CP/M and other Z-80-depen- 
dent software. 

At the heart of these new computers 
is the 6509, a new processor from 
MOS Technology. Its instruction set is 
identical to that of the 6502, but 
several other enhancements have been 
added. The addressing capability is ex- 
panded from the 6502' s current 64K to 
1 megabyte. 

In last month's column the price for 
HESCAT was inadvertently listed as 
$23.95. It should be $39.95. 

/MCRO 







SIGNALMAN MARK I DIRECT CONNECT 
MODEM - $89.50 

Standard 300-baud, full duplex, 
answer/originate. Powered by 
long lasting 9-volt battery (not 
included). Cable and RS-232 
connector included. 

EPR0MS - HIGH QUALITY, NOT JUNK 

Use with PET, APPLE, ATARI, SYM, AIM, etc. 450 ns. $6.50 
for 2716, $12.50 for 2532. We sell EPR0M programmers 
for PET and ATARI 



5% INCH SOFT 
SECTORED DISKETTES 

Highest quality. We use them on 
our PETs, APPLEs, ATARIs, and other 
computers. $22.50/10 or $44.50/20 



NEW! C. ITOH STARWRITER F 10 
DAISY WHEEL PRINTER 

Letter quality, flawless copy at 40 char/sec. Bidirectional 
printing, 15-inch carriage, uses standard Diablo ribbons 
and print wheels. 

PARALLEL - $1495, RS-232 - $1680, TRACTORS - $210 




MAE SOFTWARE DEVELOPMENT SYSTEM 
FOR PET, APPLE, ATARI 

$169.95 
'The Compatible Assembler" 

• Professional system for development of Machine Lan- 
guage Programs. 31 Characters per label. 

• Macro AssemblerfText Editor for Disk based systems. 

• Includes Word Processor for preparation of Manuals, etc. 

• Standard Mnemonics - Ex.: LDA (LABEL), Y 

• Conditional Assembly, Interactive Assembly. 

• Editor has string search/search and replace, auto line 
numbering, move, copy, delete, uc/lc capability. 

• Relocating Loader to relocate object modules. 

• Designed with Human Factors Considerations. 
FLASH!! EHS Management has decided to allow $50.00 credit 
to ASM/TED owners wtiD want to upgrade to MAE. To get this 
credit, return ASM/TED manual with order for MAE. 

i BEFORE YOU BUY THAT OFF-BRAND ASSEMBLER, 
WRITE FOR OUR FREE DETAILED SPEC SHEET. 

SMARTERM 80 COLUMN CARD 
FOR APPLE -$279 

Upper/lower case and 80 columns. Includes 5x7 matrix 
character set, full ASCII keyboard, and true shift key 
operation. 

TYMAC PARALLEL PRINTER INTERFACE 
FOR APPLE -$119.95 

For use with Centronics, Starwriter, Prowriter, etc. 



TRAP65 - $69.95 
(was $149.95) 




Traps 6502 unimplemented 
opcodes and helps prevents 
accidental system crashes. 
Also useful to extend the 6502's 
instruction set. imagine a 
DIVIDE or MULTIPLY instruc 
tion, or PHX, PHY, etc. Manual 
describes how you can add 
new instructions. 



EPROM PROGRAMMER 
FOR PET AND ATARI COMPUTERS 

The BRANDING IRON is an EPROM programmer especially 
designed for PET and ATARI computers. Programs 2716 
and 2532 type EPROMs. The PET version plugs into the 
cassette and I/O port and comes with software which adds 
the programmer commands to the PET monitor. The 
ATARI version plugs into controller jacks and comes with 
a full fledged machine language monitor which provides 
30 commands for interacting with the computer and the 
BRANDING IRON. PET - $75.00 ATARI - $119.95 

C. ITOH PROWRITER DOT MATRIX 

Near letter quality printing at 120 char/sec with tractor 
and friction feed and graphics capabilities (some say it is 
better than the MX-80). 

PARALLEL - $499.95 , RS-232 - $660.00 




3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919)924-2889 (919)748-8446 
Send for free catalog! 



r 



ARK COMPUTING 



LOWERS THE BOOM 
ON HIGH PRICES 



SPECIALS 



GAMES 



16K Ram Board $79.95 

80 Column Board (wiz-80) $195.00 

Parallel Printer Interface (w/cabie) $59.95 

(compatible with Pascal, Basic, CP/M) 

Z-80 Softcard $259.95 

Joyport $59.95 

ARK Special $295.00 

(includes Wiz-80, Lazer Keyboard Plus, Lazer 
Lower Case Plus) 

On-Line Systems: General Manager $99.95 

Diskettes w/hubrlng (1 0) $1 9.95 

Hi-Res Secrets $84.95 

Expediter II $59.95 

The Dictionary $69.95 

Microsoft 16K Ram Card $99.95 

Time Zone $69.95 

Lazer Keyboard Plus $69.95 

Lazer Lower Case Plus $44.95 

Lazer Lower Case Plus II $19.95 

Anixl.O $34.95 

Lazer Pascal $29.95 
Anix-Pac 

(Anix, Pascal, Sources) $99.95 
Using 6502 

Assembly Language $14.95 

Datamost Joystick $39.95 

Datamost Expandaport $49.95 



HARDWARE 



BUSINESS SOFTWARE 



12" hi-res green display 

12" lo-res color display 

12" hi-res RGB color display 

Apple Cat II 

Apple Clock 

Supenalker SD2000 

Romplus 

Romwnter 

Mus«c System 

A/DrD/A 

Expansion Chassis (1 25v) 

CPS Multifunction Card 

RAM Plus +-(32 RAM board 

W/16K installed) 
COPYROM 
Keyboard Filter ROM 
13 Key Keypad (new or old) 
Bar code reader 
Softkey (1 5-key user-defin.) 
Asynchronous Serial 
Datamost Joystick 
Datamost Expandaport 
Micromodem 
Smartmodem (RS-232) 
LowerCase + (Rv.6& earlier) 
LowerCase* II [Rv. 7 & Ltr.) 
Lower Case+- lll(Rv 7& Ltr) 
Keyboard #PIds 
Character Set + Plus 
Sup R' Term 80-col. board 
Sup 'R' Switcher (pwr.suppl) 
A35 3S-track disk drive w/o 

controller 
A35 35-track disk drive w/ 

controller 
A40 40-lrack disk drive w/o 

controller 
A40 40-hack disk drive w/ 

controller 
A70 70-track disk drive w/o 

controller 
A70 70-track disk drive w/ 

controller 



$285.00/8159.95 
$430.00/6349.95 
$1 095.00/5895.95 
$389.00/5329.00 
5»i>80,UU/»1».S5 
$199.00/5149.95 
$155.00/5124.95 
$1 75. 00/S1 39-95 
$395.00/5295.95 
$350.00/5249.95 
$750 00/5495. 00 
$239.00/51 49.95 
$1 89.00/51 39-95 

$55.00/844.95 

$5 5 00/544.95 

$125 00/594.95 

$195.00/5145.95 

515000/5119.95 

$179.95/5129.95 

$59.95/539.95 

$69.95/549.95 

$379 00/5269.00 

$2 79 00/5199-00 

$64.95/544.95 

$2 4 95/514.95 

$49 95/534.95 

$99 95/569.95 

$24 95/519.95 

$395.00/5295.00 

$295.00/5195.00 

$4 79.00/5379.00 

$579.00/5449.00 

$449 00/5359.00 

$549 00/5449.00 

$599 00/5499. 00 

$699.00/5599.00 



Mail Label & Filing System 

Payroll 

General Ledgertw/payables) 

Home Money Minder 

The Mail Roam 

CPA I General Ledger 

CPA II Accounts Receivable 

CPA 111 Accounts Payable 

CPA IV Payroll 

CPAV Property Manage. 

The Home Accountant 

Word Star 

Supersort 

Mail Merger 

Data Star 

Spellstar 

Calc star 

Visicalc3 3 

PFS (Personal Filing System) 

PFS Report 

The Correspondent 

Mailing List Database 

Higher Text II 

Directory Manager v 2 

Real Estate Analysis Pym 

PIE WRITER 

Easy Mover 40-column 

Easy Mailer 40-column 

Easy Writer 40-column 

Pro Easy Mailer 

Pro Easy Writer 

Super Scribe I 



$74.95/549.95 

$395 00/5295. 00 

$495.00/5395.00 

$34.95/524.95 

$34.95/524.95 

$249.95/5169.95 

$249.95/5169.95 

$249 95/5169.95 

$249.95/5169.95 

$249.95/5169.95 

$74.95/554.95 

$375.00/5195.00 

$200 00/124.95 

$125.00/579.95 

$300.00/5195.00 

$200.00/5124.95 

$200 00/5124.95 

$250.00/5179.95 

$125 00/589.95 

$95.00/569.95 

$59.95/549.95 

$49.95/539.95 

S39 95/529.95 

$29 95/521. 95 

30% OFF 

(call for details) 

$4995/539.95 

$6996/549.95 

$99.95/574.95 

$1 75.00/5124.95 

$249.95/179.95 

$1 29.95/579.95 



Sottporn Adventure (no grapni 

#0 Mission Asteroids 

#1 Mystery House 

#2 Wizard & Princess 

#3 Cranston Manor 

#4 Ulyesses & the Golden 

Fleece 
#5 Time Zone 
Hi-res Cribbage 
Hi-res Soccer 
Hires football 
Sabotage 
Jawbreaker 
Threshold 
Missle Defense 
Crossfire 
Pegasus 
Warp Destroyer 
Star Crusier 
Adventure 
Both Barrels 
Cyber Strike 
Phantoms Five 
Space Eggs 
Autobahn 
Pulsar II 
Orbitron 
Gamma Goblins 
Gorgon 
Sneakers 

EPOCH 

Cops & Robbers 

Outpost 

Dark Forest 

Beer Run 

Borg 

Joy Port w/loosball 

Hadron 
Twerps 

Computer Foosbal 

Wizardry 

Galactic Attack 

Minator 

Oylmpic Decathlon 

Three Mile Island 

ABM 

Robot Wars 

Global War 

Castle Wolfenstem 

Falcons 

Grand Prix 

The Best ol Muse 

Flight Simulator 

Dungeon Campaign 

Odyssey 

Escape From Arcturus 

Palace in Thunderland 

MAD Venture 

Roach Motel 

English SAT#1 

U.S. Constitution 



$29.95/519.95 
$19.95/514.95 
$24.95/516.95 
$32.95/619.95 
$3495/624.95 
$34.95/624.95 

$99.95/669.95 
$24 95/619.95 
$29.95/619.95 
$39.95/626.95 
$24.95/619.95 
$29.95/519.95 
$39.95/624.95 
$29.95/619.95 
$29.95/619.95 
$29.95/619.95 
$29 95/621.95 
$24.95/619.95 
$29.95/621.95 
$24.95/619.95 
$39.95/629.95 
$29 95/621.95 
$29.95/619.95 
$29.95/621 .95 
$29.95/621.95 
$29.95/521.95 
$29.95/619.95 
$39.95/629.95 
$29.95/619.95 
$34.95/624.95 
$34.95/524.95 
$29.95519.95 
$29.95/519.95 
$29 95/519.95 
$29.95/519.95 
$74.95/659.95 
$34 95/524.95 
$29 95/619.95 
$29 95/619.95 
$49.95/639.95 
$29.95/621.95 
$34.95/624.95 
$29.95/521.95 
$3995/629.95 
$24.95/619.95 
$39.95/629.95 
$24.95/619.95 
$29.95/521.95 
$29.95/621 .95 
$29.95/621 .95 
$29 95/521 .95 
$39.95/629.95 
$33.50/626.95 
$17.50/614.95 
$29.95/621.95 
$24.95/619.95 
$24.95/619.95 
$24.95/619.95 
$34.95/626.95 
$29.95/621.95 
$29 95/621.95 



UTILITIES 



Hi-Res Secrets (O. Fudge) 

Super Shape Drg & Animate 

The Creative Tool Box 

Applesoft Compiler 

Datadex 

Using 6502 Assembly Lang 

ANIX (UNIX-like Oper. sys.) 

Lazer Pascal 

DOSOURCE 3 3 

Painter Power 

The Voice 

FZ Draw 

Pascal Graphics Editor 

ACE 

Apple- DOC 

List'Master 

ASCII Express 

Z-Term (req's Z-80 Card) 

Z-Term Pro 

Speed Star 

On-Line 

DB Master 



$124.5*5/584.95 

$3495/624.95 
$4495/534.95 
$175.00/129.95 
$150.00/599.95 
$19.95/514.95 
$4995/639.95 
$39.95/529.95 
$39.95/524.95 
$39.95/529.95 
$39 95/629.95 
$4995/539.95 
$99 95/589.95 
$39 95/629.95 
$49,95/639.95 
$39.95/629.95 
$79.95/659.95 
$99.95/669.95 
$149.95/699.95 
$134 95/699.95 
$89.95/569.95 
$229.00/6159.95 



Upper Reaches ot Apshai 

The Keys to Acheron 

Datestones of Ryn 

Morloc's Tower 

Ricochet 

Starfleet Orion 

Invasion Orion 

The Dragon's Eye 

Tues Morning Quarterback 

Jabbertalky 

Sorcerer ol Siva 

Rescue at Rige 

Crush, Crumble, and Chomp 

Temple of Apshai 

Hellfire Warrior 

Star Warrior 

Hires golf 

Race for Midnight 

Midnight Music 

Star Blazer 

Apple Panic 

Space Quark 

Hed Alert 

Track Attack 

Genetic Drift 

Arcade Machine 

Raster Blaster 

Trilogy of Games 

Space Album 

Fender Bender 

3-D Graphics 

Akalabeth 

Appleotds 

Ulitma 

LA Land Monopoly 

Hyperspace Wars 

3-D Skiing 

Torpedo Terror 

Computer Bingo 

Kaves Karkhan 

Dragon Fire 

Rings of Saturn 

Alkemslone 

Snack Attack 

Casino 

Thief 

County Fair 

Swashbuckler 

Firebird 

Russki Duck 

Sargon II 

Reversal 

Zork 

Zork II 

Pool 1 ,5 

Shuffle board 

Trick Shot 

Crossword Magic 

Master Type (hi-res) 

Dogfight 

Crown of Arlhain 



(19 95/615.95 
$19 95/615.95 
$19 95/615.95 
$19 95/615.95 
$19 95/815.95 

$24.95/19.95 
$24.95/619.95 
$24.95/619.95 
$29.95/821.95 

$29.95/21 .95 
$29.95/821.95 
$29 95/821-85 
$29.95/821.95 
$3995/629.95 
$39.95/829.95 
$3995/629.95 
$29.95/821.95 
$29.95/821.95 
$34.95/824.95 
$3 1. 95/824.65 
$29.95/819.95 
$29.95/819.85 
$29.95/819.85 
$29.95/819.95 
$29.95/819.95 
$44.95/629.95 
$29.95/821.95 
$29 95/821.95 
$39.95/829.95 
$24.95/919.95 
$39.95/629.95 
$34.95/924.95 
$29.95/821.95 
$39.95/929.95 
$29.95/821.95 
$29.95/621.95 
$24.95/819.95 
$24,95/816.95 
$24.95/819.95 
$49.95/834.95 
$49.95/834.95 
$39.95/828.95 
$39.95/829.95 
$29.95/819.95 
$3995/824.95 
$29.95/818.95 
$29.95/919.95 
$34.95/824.95 
$29.95/61 9.95 
$34.95/825.95 
$34.95/525.95 
$34.95/825.95 
$3495/825.95 

$39.95/829.95 
$34.95/624.95 
$29.95/821.95 
$39.95/929.95 
$49.95/839.95 
$39.95/829.95 
$29.95/821.95 
$3495/826.95 



UTILITIES 



ii Pack 



LISA v2.5 
LISA Educatio 
Speed/ASM 
Expediter II 
Disk Organizer II 
Applesoft Plus 
Applesoft Optimizer 
Disk Recovery 
Multi-disk Catalog 
Back it up 
Image Printer 
Pascal Lower Case 
Dos Plus 

The Original Quick Loader 
Typing Tutor 
Fortran 
A.L.DS 

Basic Compiler 
Coboi 
TASC 
_Data Plot 
DB Utility Pack 



$79.95/859.95 
$119.95/879.95 
$39.95/629.95 
$99.95/859.95 
$29.95/5*1.95 
$24 95/519.95 
$24.95/819.95 
$29 95/821 .95 
$24.95/819.95 
$59 95/839.95 
$29.95/629.95 
£24 95/819.65 
$24 95/619.95 
$2495/819.95 
$24.95/819.95 
$195.00/9139.95 
$125.00/889.95 
$395.00/8295.00 
$750 00/6495-00 
$175 00/8129.95 
$59.95/544.95 
$99.00/866.95 



n date), CASHIER or CERTIFIED CHECKS, MONEY ORDfcHS, or PERSONAL CHECKS (Please allow 10 



We accept; MASTERCARD, VISA (Include card # and expir; 

days to clear). 

Please add 3% tor shipping A handling (minimum $2 00). Foreign orders please add 10% tor shipping 4 handling. 

We accept COD's (Please Include $2.00 COD charge). California residents add 6% sales tax. All equipment Is subject to price change and a' 

equipment is new & complete with manufacturer's warranty. 






a regis^ 



Of APPLE COMPUTER INC. 



YOUR SALVATION IN THE SEA OF INFLATION 

ARK COMPUTING 



P.O. BOX 2025 

CORONA, CALIFORNIA 91 720 

(714)735-2250 
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EXCEL-9 

The Ultimate 6809 Board for Apple 

from Esdec Corporation, a subsidiary of ESD LAB Co. Ltd. 

C, a famous DOS, Assembler and Editor included. 
Apple DOS. 



• EXCEL-9 FLEX 

• Also able to use Appl< 

• 8KB versatile monitor contains 35 




• Abie to switch MPU from 6809 to 6502 and vice versa in both machine code routine 

• TSC 6809 BASIC, EXTENDED BASIC, PRECOMPILER, SOFT/MERG, etc., are 



Ask your nearest dealer or 

Norell Data Syst. Corp. 

3400 Wilshire Blvd. 

P.O. Box 701 27 

Los Angeles, C A 90010 

(213)257-2026 

United States Distributor 



Dealer Inquiries are Invited. 



Introductory 
Price: 



£>TCA t\f% for Board & FLEX 
$*rQ%JmU%J diskette 

(Sales tax not included) 



FLEX is a trade mark of Technical Systems Consultants, Inc. 



RAPHTRIX™ 1 .3, 

NEED 

HARD COPY OF YOUR APPLE II 

HI-RES GRAPHIC? 

WITH 
GRAPHTRIX™ 1 
YOU CAN 
INSERT YOUR 

GRAPHIC 
ANYWHERE 
IN YOUR 
TEXT. 
USE ANY OF 
19 PRINTERS 
AND 
10 INTERFACE CARDS 
Data Transforms Inc. 
61 6 Washington, Suite 106 
Denver, Colorado 80203 
(303) 832-1501 
Features: Graphic Magnification 
Normal/Inverse, Page Centering, 
High and Low Crop Marks, Title String, 
Superscript, Footnotes, Chapters, Fully 
Menu Driven 

REQUIRES: Apple II with 48K, Applesoft 
in ROM, One Disk Drive with DOS 3.3. 

Apple is a Trademark of Apple Computer Inc. 

c Copyright 1982 Data Transforms Inc. All Rights Reserved. 

GRAPHTRIX is the Trademark of Data Transforms Inc., a division of Solarstatics Inc. 




From 





CAN YOU SEE WHAT YOUR 
WORD PROCESSOR 
IS GOING TO PRINT? 

WITH 

EDITRIX 

YOUR TEXT WILL 

BE DISPLAYED 

AS IT 

IS TO BE 

PRINTED, 

UP TO 

220 COLUMNS 

Insert Graphics, 
Footnotes, Superscripts 
or Different Type Fonts 
Anywhere In Your Text 

These Features Plus Many More 

Are Right At Your Fingertips With 

EDITRIX™ 

From 

Data Transforms Inc. 

616 Washington, Suite 106 

Denver, Colorado 80203 (303) 832-1501 

REQUIRES: Apple II with 48K, Applesoft in ROM, 

DOS 3.3 and the GRAPHTRIX 1 .3 Matrix Graphics System. 

Apple is a trademark ol Apple Computer Inc. 
(c) Copyright 1982 Data Transforms, Inc. All Rights Reserved 
' EDITRIX AND GRAPHTRIX are the trademarks of Data Transforms Inc.. a division of Solarstatics Inc. 
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Reviews in Brief 



Product Name: 
Equip, req'd: 

Price: 
Manufacturer: 



Line Printer VIII 

Centronics or RS-232 standard 

computer or terminal 

$799.99 

Tandy Radio Shack 

Fort Worth, TX 76102 



Description: Dot matrix printer with high density 9-wire 
print head. Logic seeking, unidirectional head movement. 
Print speed is 40 to 100 CPS in print modes. 480 dot per 
second in graphic mode. Modes include data processing, 
word processing, and bit graphics. There are six character 
fonts, including 5, 8.3, 10, 16.7 cpi and 2 proportional 
fonts. Features include partial and reversible line feeds, 
thus allowing super- and subscripts. A 9 x n mode allows 
the space between characters to be altered. By introducing 
the proper commands between words or letters, right justi- 
fication of text is supported. A simple command causes 
text to be underlined until another command is received. 
All fonts can be accessed at any time within the line. Paper 
feeds include friction, pin, or single sheet. Another feature 
supported is a backspace command. Backspaces, or any 
character, may be repeated with a single command. 
Switch selection of European or Katakana is allowed. Con- 
trols include power, On-line/ Off-line and restart/reset 
switch. 

Pluses: The standard Centronics parallel interface, as well 
as the built-in 600 or 1200 baud RS-232 interface allows 
connection to many different models and brands of com- 
puters, or terminals. Fonts and modes may be changed at 
any time, even in mid-line by software control. Font 
capacity is increased by combining ordinary, condensed, 
and elongated modes. The range of characters per line 
varies from 40 to 132. A visual indicator warns of paper 
feed problems, and the front panel restart switch allows 
easy recovery from those kinds of interruptions. When the 
problem is repaired, pressing the restart switch will allow 
the printer to continue from where it left off with no loss 
of data. The two proportional fonts produce excellent 
quality characters, with serifs. 

Minuses: Our sample has a problem with the ribbon hang- 
ing up on the perforations between sheets of fanfold paper. 
Occasionally, when this happens, the ribbon comes off the 
print head, and must be rethreaded. Increasing tension on 
the paper leaving the printer will usually alleviate the 
problem. A permanent solution was found in our case by 
gluing a small washer to the top of the print head. The 
washer hangs over the top edge, keeping the ribbon in 
place. Other samples of the machine were not available to 
check to see if this is a common occurrence or a flaw in 
this particular machine. Though not a problem with the 
printer itself, at the present time, there is little software 
available that supports its advanced features. 
Documentation: Though thorough, it is not an instruction 
manual as much as a reference manual. Printer set up, 



operation, and programming information are included, but 
be prepared for heavy reading. 

Skill level required: Hook-up and use of the printer is easy, 
and all commonly supported features are available for 
commercial programs. Writing your own software to 
operate the printer in its proportional modes, however, 
would take a high degree of programming skill. 

Reviewer: John Steiner 



Product Name: TEXTPRO 

Equip, req'd: TRS-80C Color Computer with 

matching printer; empty ROMpack for 

EPROM version. 
Price: $39.95 - cassette tape 

$59.95 - EPROM 
Manufacturer: CER-COMP 

5566 Ricochet Ave. 

Las Vegas, NV 

Description: TEXTPRO is a combination text editor and 
text processor. The editor portion allows nearly a full 
range of editing capability, including tape file handling and 
the ability to concatenate tape files. Lines can be deleted, 
renumbered, and added using line numbers; numbers can 
be removed to save space or added to files recorded from 
other editors. String search, move, replace, and copy 
modes are available. The edit process has non-destructive 
cursor control, insert and delete, and forward and reverse 
scrolling capability. 

Once the text has been entered and edited, it can be 
LISTed with or without line numbers, or the printing can 
be turned over to the text processor. Text processing con- 
sists of over 30 commands that imbed printer control func- 
tion commands within the text. 

Pluses: The package has a great capability for extremely 
low cost; either version requires 1 6K of memory, but the 
ROM version is a practical necessity if one intends to do 
much writing on a 16K machine, since the program is 
about 6K long. Even though the total cost for the ROM is 
high, it is worth the extra convenience. 

Minuses: Lack of non-destructive cursor and insert mode 
during text entry, lack of horizontal scrolling to solve the 
32-character Color Computer display problem, and in- 
ability to handle hyphenation in either mode. 

Documentation: There is a lot of documentation, con- 
sidering the product's price, but some of it is incomplete 
or confusing, without examples of how to use certain com- 
mands. A sample edit session is furnished, but it is far too 
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Reviews in Brief 



(continued) 



brief and does not illustrate the more difficult commands. 
In spite of these difficulties/ this package is a bargain, even 
at the price for the ROM. 

Skill level required: One must be an experienced writer 
who really needs a text processor before he can appreciate 
this package and its capabilities. 

Reviewer: Ralph Tenny 



Universal Boot Initializer 

48K Apple II or Apple II Plus 

with 16K memory card or ROM card 

$49.95 plus $3.00 postage and 

handling ($15.00 for back-up disk) 

S&H Software 

Box 5 

Manvel, ND 58256 

Art Schumer 

Yes 

6502 Machine Language 

utility for modifying both 13- and 
16-sectored disks to permit booting with either 13- or 
16-sectored disk controller PROMs. Includes a quick 
loading feature to rapidly install the "other" BASIC in a 
memory card. Permits greeting programs of binary and 
text files as well as the more usual BASIC types. 



Product Name 
Equip, req'd: 

Price: 

Manufacturer: 



Author: 

Copy Protection: 
Language: 
Description: A 



WINCHESTER 

FOR MOTOROLA 

EXORCISOR/MDOS 

□ 10 MB Winchester hard disk runs MDOS on Motorola 
Exorcisor System D No modification to MDOS required 

□ MDOS based software stays alive □ All user software 
operates without modification □ Optional SA-801 R flex- 
ible diskette drive system D Optional 10 MB removable 
cartridge. 

j* MW^ For information call (714) 566-3911 

h K O Computer System Associates 

^j^li -J 7562 Trade Street, San Dieqo, CA 92121 




Pluses: For software developers and club librarians faced 
with serving Apple owners of both 13- and 16-sectored 
controller PROMs, this utility will be quite valuable. For 
memory card owners, the quickloading of the "other" 
BASIC is a time saving feature. The manual is carefully 
written, following a "training" program which is included 
with the package. After working with both for a few 
minutes, proper use of the program is virtually assured. 
Added features include: the ability to use binary and text 
files as greeting programs as an alternative to the usual 
BASIC program; the use of Directory Title Formatting for 
more carefully described CATALOG listings and the facility 
to report an error message in the event that the required 
BASIC (Integer or Applesoft) is not present. 

Minuses: The user must have both BASICs available via 
16K memory card or ROM card. To permit 16-sectored 
users to boot DOS 3.2. 1 disks, a copy of UPDATE 16, writ- 
ten by Steve Wozniak is included. Use of UPDATE 16 pro- 
hibits the standard COPY program from reading the 
modified track on the 13-sectored disk. Such 13-sectored 
disks must be copied with other procedures. Individuals 
purchasing this utility for the quick loading of the other 
BASIC must be aware that disks initialized after such a 
boot will look for the same file type greetings program as 
was on the boot disk. In the reviewer's opinion, the cost of 
the package is notably high. 

Skill level required: The carefully written manual and 
training program can be used by almost any Apple owner. 

Reviewer: David R. Morgans tein 



Product Name: CMEMORY 

Equip, req'd: TRS-80C Color Computer 

Price: $24.95 

Manufacturer: MICRO-LABS, Inc. 

902 Pinecrest Dr. 

Richardson, TX 75080 
Description: A molded plug-in module for the Color Com- 
puter with a removable PC board; it has sockets for four 
2716 EPROMs or 2716-pinout CMOS or CMOS read-write 
memory devices. The part is well-manufactured and fits 
properly in the port. 

Pluses: Allows convenient packaging of any mix of 2716 
and 6116-type memory devices, thus facilitating special- 
purpose program plug-ins for instant change of program- 
ming. In addition, it is possible to piggy-back four addi- 
tional 6116 read- write devices on the four installed in the 
module, thus giving almost 16K of additional memory for 
the computer. Very reasonable price. 

Minuses: None noted. 

Documentation: Adequate explanation is given to use and/ 
or modify this product for any of the intended purposes. 

Skill level required: None, unless the owner supplies pro- 
gram for the cartridge or uses the piggy-back method to ex- 
pand to 16K. In the case of user programs, it is necessary to 
understand the techniques used to adapt programs to run 
in ROM at specific addresses. In the case of cartridge 
modification, minimal soldering and assembly skills are 
required. 
Reviewer: Ralph Tenny 
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Product Name: Key Perfect 

Equip, req'd: Apple II or Apple II Plus 

with 48K RAM, 1 Disk II 
Price: $29.95 

Manufacturer: micro-spare, inc. 

P.O. Box 639 

Lincoln, MA 01773 
Description: Utility which computes "check codes" 
associated with Apple II program files. This allows the 
user who keys in a program from a published listing to 
compare published values of check codes with those ob- 
tained from the keyed-in version. The aim is to facilitate 
the location of keying errors. 

Pluses: Seems to work. 

Minuses: This is really the kind of program that should be 
published and given away, rather than sold. That is, I feel 
it is overpriced! The program is not particularly user- 
forgiving. For example, to switch to or from Key Perfect 
you must reboot each time. The program does not allow a 
CATALOG command to be issued while it is running — so 
don't forget your program name! The program should 
prompt for what DOS is on the check disk; instead it 
deduces this information thus slowing things down. The 
program incessantly prompts you to make sure you 
haven't made a mistake in specifying information. While 
this is okay for novices, it should be optional for experts. 

Documentation: Adequate. It would be interesting and of 
educational value to include a discussion of the algorithms 
used to compute the check codes. 

Skill level required: Ability to follow directions. 

Reviewer: Richard C. Vile, Jr. 



Price: 



Manufacturer: 



Author: 

Copy Protection 

Language: 



Product Name: Amper-Sort/Merge 

Equip, req'd: 48K Apple with Applesoft 

and DOS 3.3 data files 

$49.95 plus $3.00 postage and 

handling ($15.00 for back-up disk) 

S&H Software 

Box 5 

Manvel, ND 58256 

Alan Hill 

Yes 

6502 Machine Language 
Description: A utility package for sorting of sequential or 
random access text files. Can sort and merge up to five 
user-supplied file names at machine-language speeds. Can 
sort on as many as five user-specified keys, each key 
selected for ascending or descending order. 

Pluses: Program is user-friendly with ample prompts. Uses 
work files for multiple merging operation under program 
control, thus allowing the user to sort large text files. 
Twenty-four-page manual is well written and clear and in- 
cludes some history of the development of the Amper-sort 
package. The author has published many articles on sort- 
ing and related topics, and has provided in those articles 
source code for the original version. The package will sort 
Visifile data bases, given the use of a short BASIC program 



provided in the manual. The user specifies the slot and 
drive of the input files, of a disk with space for work files 
required to perform the sort, and of the disk to contain the 
sorted data. The sorting parameters (file names, fields for 
sorting, slot and drive numbers) can be saved in a file for 
later use. The program uses fast garbage collection 
routines to increase speed and special file reading routines 
for faster disk access of arrays. 

Minuses: The package has few faults. The reviewer found 
a screen prompt regarding slot and drives specified to be in 
error. When a slot and drive for the work file was specified 
to be other than the default value, the prompt incorrectly 
referred to the default with a statement like "insert 
workf ile in slot 6, drive 1 ' ' when drive 2 was the selected 
one. The program correctly read from drive 2 and sorted 
properly, however. This fairly minor problem should be 
easy to correct. Unlike the articles published by Alan Hill, 
the program is on a protected disk; it cannot be easily in- 
corporated in a user's program. 

Skill level required: The program must be handled as a 
utility by a fairly knowledgeable user who understands the 
file names and formats of the data to be sorted. The user 
needs no programming knowledge, however. 

Reviewer: David R. Morganstein 

AfCOO 



ENGINEERS/TECHNICIANS 

THE MICRO 68000 
IS DESIGNED FOR YOU! 

COMPLETE, READY-TO-GO SYSTEM INCLUDES: 

□ 6 amp switching power supply D Keyboard 

□ Display- Hex & Binary □ Pete Bug keyboard 
monitor □ Optional Macs Bug CRT monitor □ At- 
tractive cabinet □ Dual RS232 interface □ 32 bit 
parallel I/O □ Versabus compatibility □ The only 
system that provides for direct entry of 68000 
machine code. 

jp MW^ For information call (714) 566-3911 

■ mil Computer System Associates 

^^1 V 7562 Trade Street, San Diego, CA 92121 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC. 

THE TASK* MASTERS 

HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4 1 / 2 " x 6V2", with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 



OMNIDISK 65/8 and 65/5 

Single and dual drive 8" and 5 1 A" disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE's proprietary operating system, 
FODS (File Oriented Disk System). 



DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 



HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF . . . THEN . . . ELSE. 
Sequential and random file access and much 
more. $175.00 

HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 



DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 



DM81 6-P8 

A 4/8K EPROM card for 2708 or 271 6 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. 



DM816-CC15 

A 15 position motherboard mounted in a 19" 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. 



DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 

AVAILABLE DIRECT OR 



HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 

HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 

HDE DYNAMIC DEBUGGING TOOL (DDT) 

Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 

HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 
FROM THESE FINE DEALERS: 



Progressive Computer Software 
405 Corbin Road 
York, PA 1 7403 
(717) 845-4954 



Johnson computers 

Box 523 

Medina, Ohio 44256 

(216) 725-4560 



Lux Associates 
20Sunland Drive 
Chico, CA 95926 

(916)343-5033 



Falk-Baker Associates 

382 Franktin Avenue 

Nutley, NJ 07110 

(201)661-2430 

Laboratory Microcomputer Consultants 

P.O. Box 84 

East Amherst, NY 14051 

(716)689-7344 



Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516)744-6462 



Computer-Assisted 

Translation of Programs 

from 6502 to 6809 



by Edgar Pass 



The article discusses techniques 
of translating 6502 programs to 
run on a 6809-based machine. 
Tables, 6809 routines, and 
discussion of special problems 
are included. 

Initial Comparison 

From a review of the Motorola 6800 
and 6809, and MOS 6502, the instruc- 
tion sets of the 6809 and 6502 are both 
seen to be derivatives of the (older) 
6800 instruction set. However, the ex- 
tensions and changes made in the 6809 
and 6502 instruction sets have been in 
quite different directions. Table 1 
presents the programming models for 
each of the processors, to indicate the 
flavor of some of the changes and 
extensions. 

Register Comparison 

The similarities and differences in 
the register structures of the processors 
are apparent in table 1. Of the three 
processors, the 6809 has the most ver- 
satile register structure with its two 
8-bit accumulators, 8-bit direct page 
register, two 16-bit index registers, and 
two 16-bit stack pointers. The 6502 has 
a less versatile register structure than 
either of the other two processors, its 
only highlight being a second 8-bit in- 
dex register. The relative speed of the 
processors or relative compactness of 
the code are not issues here. 

When matching up the register 
structures from the 6502 to the 6809, 
most registers map to the similarly 
named register. The exception is the 
6502 A register, which corresponds 
more closely to the 6809 B register than 
the A register because of the manner in 
which the 6809 TFR and EXG instruc- 
tions function. 

The condition code registers of the 
three processors all differ in format and 
content, with the 6800 and 6809 being 
the most similar and the 6502 the most 



Table T; 


Programming Models for the 6800, 6809, and 6502 


Registei 


Bits 


Description 
6800 


A 
B 

CC 
PC 

s 

X 


8 

8 

8 

16 

16 

16 


Accumulator 

Accumulator 

Condition Code Register (11HINZVC) 

Program Counter 

Stack Pointer 

Index Register 

6809 


A 

B 

CC 

D 

DP 

PC 

S 

U 

X 

Y 


8 
8 
8 
16 
8 

16 
16 
16 
16 
16 


Accumulator 

Accumulator 

Condition Code Register (EFHINZVC) 

A and B Registers (Concatenated) , 

Direct Page Register 

Program Counter 

Stack Pointer 

User Stack Pointer 

Index Register 

Index Register 

6502 


A 

CC 

PC 

s 

X 
Y 


8 
8 

16 
8 
8 
8 


Accumulator 

Condition Code Register (NV0BDIZC) 

Program Counter 

Stack Pointer (First 8 bits = 01) 

Index Register 

Index Register 


where Condition Code Register bits are defined as follows: 



B 

C 

D 

E 

F 

H 

I 

N 

V 

Z 



BRK command (6502) 
carry/borrow 
decimal mode (6502) 
entire state on stack (6809) 
fast interrupt (6809) 
half carry (6800/6809) 
interrupt mask 
negative 
overflow 
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NEW LOW PRICE 

DIRECT FROM MANUFACTURER 

$120.00 



%<?M 
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16K RAM EXPANSION BOARD 
FOR THE APPLE U* $120.00 



The Andromeda I6K RAM Expansion Board 
allows your Apple to use RAM memory in place 
of the BASIC Language ROMs giving you up 
to 64K of programmable memory.. Separate 
Applesoft* or Integer BASIC ROM cards sre no 
longer needed. The 16K RAM Expansion Board 
works with the Microsoft Z-80 card, Visicalc, 
DOS 3-3, Pascal, Fortran, Pilot, and other 
software. A switch on the card selects either 
the RAM language or the mamboard ROMs 
when you reset your Apple. 

The Andromeda 16K RAM Expansion 
Board has a proven record for reliability with 
thousands of satisfied customers. 



Now with One Year Warranty. 

/UOflOMEDA 



u 



INCORPORATED 

Greensboro, NC. 27410 
919 852-1482 P.O. Box 19144 

Price for Andromeda I6K RAM 
expansion board now only SI 20.00. 
Please add $5 for shipping and 
jjTl handling. North Carolina residents 
add 4% sales tax. 
*DEALER INQUIRIES WELCOME. 
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unlike. All three condition code 
registers contain carry/borrow, inter- 
rupt mask, negative, overflow, and zero 
bits, although the interpretation and 
setting of bits may vary considerably 
among the three. 

The 6502 "V" flag is modified by 
far fewer instructions than the "V" 
flags on the 6800 and 6809 processors. 
The 6502 "B" flag allows an interrupt 
processing routine to determine the dif- 
ference between an external interrupt 
and an internal interrupt generated by a 
BRK command. The 6502 "D" flag 
determines whether the ADC and SBC 
commands will operate in decimal or 
binary mode. There are no directly cor- 
responding flags for "B" and "D" on 
the 6800 or 6809 processors. The (nearly) 
equivalent functions are performed in 
quite different ways. 

The addressing modes supported by 
each of the processors are generally 
similar, although there are a few 
significant differences. Table 2 presents 
the addressing modes of interest in 
each of the processors of interest. 

One significant difference between 
the 6502 and the other two processors 
lies in the storage format of a 16-bit 
address. Whereas the Motorola proces- 
sors store 16-bit addresses as high-order 
8-bits, then low-order 8-bits in suc- 
cessive locations, the 6502 stores 
16-bit addresses as low order 8-bits, 
then high-order 8-bits in successive 
locations. This difference appears in 
the format of instructions containing 
16-bit addresses and offsets, return 
addresses in the stack, 16-bit indirect 
addresses, interrupt vectors, jump 
tables, etc. 

There are several differences in the 
use of the S registers on the 6502, 6800, 
and 6809. The most obvious is that the 
6800 and 6809 use a 16-bit S register, 
whereas the 6502 uses an 8-bit S 
register and prefixes these 8-bits with 
an 8-bit constant 01 to form a 16-bit ad- 
dress. Thus the 6502 stack is restricted 
to addresses $0100-$01FF. The 6800 
and 6502 decrement the stack pointer 
after placing a new item into it, where- 
as the 6809 decrements it before. Thus 
the 6800 and 6502 stack pointers 
always point to one address below the 
current stack limit, whereas the 6809 
stack pointer always points to the last 
item placed onto the stack (if any). The 
TSX and TXS instructions on the 6800 
(but not on the 6502) take this into ac- 
count by adding one to the X register 
after transferring the contents of the 
the S register to it and by subtracting 
one from the S register after transfer- 
ring the X register to it. 



This difference can cause a problem 
when you translate programs from the 
6800 to the 6809. However, because of 
the highly restricted nature of the 6502 
S register, it should cause little diffi- 
culty in translating programs from the 
6502 to the 6809. The main problem 
stems from the 6800 trick of using the 
stack pointer as a second index register. 
However, the 6502 Y register functions 
as a second index register in many ad- 
dressing modes, and the 6502 S register 
is restricted to page 01 in memory ad- 
dresses, eliminating it as an effective 
third index register on the 6502. 



Table 3 summarizes many of the 
differences and similarities already 
discussed concerning the 6502, 6800, 
and 6809, in terms of the 6502 instruc- 
tion set. This set has 56 members, as 
opposed to 97 members for the 6800 
and 58 members for the 6809. How- 
ever, counting address mode and regis- 
ter variations, the 6502 can execute ap- 
proximately 100 instructions, the 6800 
can execute approximately 200 instruc- 
tions, and the 6809 can execute approx- 
imately 750 instructions. Complete in- 
struction sets for each of the 6502, 
6800, and 6809 processors may be 



Table 2: Addressing Modes 


Mode 


Description 


Inherent 

(Accumulator, 

Implied) 


Changes registers or processor states without 
explicit regard for memory addressing 


Direct 
(Zero-Page) 


Prefixes 8-bit address in instruction with 8-bit 

00 (DP on 6809) to provide 16-bit effective address 


Extended 
(Absolute) 


Uses 16-bit address in instruction directly as 
effective address 


! Immediate 


Uses 8-bit or 16-bit value in instruction directly, 
and not as a memory address 


Relative 


Adds 8-bit offset in instruction to address of next 
sequential instruction to provide effective address 
of next instruction to be executed 


Indexed (6800) 


Adds 8 -bit offset in instruction to value in X 
register to provide 16-bit effective address 


I Indexed (6809) 


Uses one or more post-byte values in instruction 
to indicate an entire range of register and direct, 
indirect, or non-indirect addressing schemes 


Zero Page Indexed 

i (6502) 


Adds 8-bit offset in instruction to value in X or Y 
register to compute 8-bit value; prefixed this value 
with 8-bit 00 to provide 16-bit effective address 


Absolute Indexed 

(6502) 


Adds 16-bit offset in instruction to value in X or Y 
register to provide a 16-bit effective address 


Indirect (6502) 


Uses the 16-bit address in instruction to provide a 
16-bit effective address; uses the contents of the 
locations at that address and at the next address to 
provide a 16-bit memory address 


Indexed Indirect 
(6502) 


Adds the 8-bit offset in instruction to value in X or 
Y register to provide an 8-bit value, which is 
prefixed by an 8-bit 00 to form a 16-bit effective 
address; the locations at that address and at the 
next address to provide a 16-bit effective address 


Indirect Indexed 
(6502) 


Prefixes 8-bit address in instruction with 8-bit 00 
to provide a 16-bit effective address; uses the 
contents of the locations at that address and at the 
next address to provide a 16-bit effective address 
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found at the end of this article. An 
asterisk in table 3 indicates that the in- 
struction has the indicated address 
mode. An entry under Condition-Code- 
Reg Form indicates the conversion of 
the Condition- Code format. An entry 
under Stack indicates stack manipula- 
tion, and an entry under X/Y indicates 
X or Y register modification. The en- 
tries under 6809 Condition-Code-Reg 
indicate the results provided by the 
translation suggested later in this 
article. 

Emulation Discussion 

The additional registers and instruc- 
tions on the 6809 make possible an 
almost exact emulation of the 6502. 
The 6809 code will not generally have 
the same length as the 6502 code, nor 
will it require the same amount of time 
to execute. Because the translation is 
being done before assembler time, no 
run-time instruction modification is 
assumed. 



Certain features of the two pro- 
cessors are similar but not identical. If 
the incremental cost of the exact 
emulation of a 6502 instruction or 
feature exceeds its incremental utility 
in a specific program or subroutine, it 
would be highly desirable to be able to 
trade off the exact emulation for a 
speed and space reduction in the 6809 
code. For instance, the format and con- 
tents of the 6502 and 6809 condition 
code registers are different. Assuming 
that the "B" and "D" flags of the 6502 
are handled separately, many 6502 pro- 
grams would run correctly with no or 
minor changes (after translation) on the 
6809, even with the 6809 format of 
condition code register. 



The following differences in the 
processors' instruction sets cause time 
and space problems in the emulation 
process: 



• reversed order of absolute address 
high and low bytes 

• stack restriction to $01XX address 
range 

• "B", "D", and "V" flag handling in 
many instructions 

• format of condition code register 

• page-zero wraparound in several ad- 
dressing modes 

• 8-bit X and Y register limitations 

Other major tradeoffs will be discussed in 
relation to the individual instructions. 



Table 3: Summary Table 














6502 


Absolute/ 


Condition-Code- 


-Reg 


Stack 


Zero 


indirect 


X/Y 


Opcode 


Zero-Page 


6502 


6809 


Form 




Wrap 


Wrap 








NV0BDIZC EFHINZVC 












ADC 


* 


NV ZC . 


H.NZVC 






* 


* 




AND 


* 


N Z. • 


. .NZ. . 






* 


* 




ASL 


* 


N ZC . 


. .NZ.C 






* 






i BCC 


















BCS 


















1 BEQ 


















BIT 


* 


NV . . . . Z . . 


. .NZV. 












BMI 


















BNE 


















BPL 


















BRK 




. . .1.1. . . 


.1. . . . 




-3 








BVC 


















! BVS 


















CLC 




. 















CLD 




0. . . RESET D 












CLI 
CLV 




0. . . 


.0. . . . 












.0 


0. 


CMP 


* 


N ZC . 


. .NZ.C 






* 


* 




CPX 


* 


N ZC . 


. . NZ . C 












CPY 


* 


N ZC . 


. .NZ.C 












DEC 


* 


N Z . . 


. .NZ. . 






* 






DEX 




N Z. . 


..NZ.. 










X 


DEY 




N Z. . 


. . NZ . . 










Y 


Opcode 


Absolute/ 


Condi tion-Code- 


Reg 


Stack 


Zero 


Indirect 


X/Y 




Zero-Page 


6502 


6809 


Form 




Wrap 


Wrap 








NV0BDIZC EFHINZVC 












EOR 


* 


N Z . . . 


. .NZ. . 






* 


* 




INC 


* 


N Z. 


. . NZ . , 






* 






I NX 




N Z. . . 


. .NZ. . 










X 


INY 




N Z. 


. .NZ. . 










Y 


JMP 


* 
















JSR 


* 








-2 








LDA 


* 


N Z. 


. .NZ. . 






* 


* 




LDX 


* 


N Z. . . 


. .NZ. . 






* 




x i 


LDY 


* 


H.....Z. 


. . NZ . . 






* 




Y 


LSR 


* 


ZC . . 


. .0Z.C 






• 






NOP 


















ORA 


* 


N Z. 


. .NZ. . 






* 


* 




PHA 










-1 








PHP 








TO 


-1 








PLA 




N Z. 


. . NZ . . 




+ 1 








j PLP 




NV0BDIZC EFHINZVC 


FROM 


+ 1 








ROL 


* 


N ZC 


. .NZVC 






* 






ROR 


* 


N ZC 


. .NZ.C 






* 






RTI 




NV0BDIZC EFHINZVC 




+ 3 








RTS 










+2 








SBC 


* 


NV ZC . . 


. .NZVC 






* 


* 




SEC 




1 . . 


1 












SED 




1. . . SET D 












SEI 
STA 


* 


1. . . . 


.1. . . . 






* 


* 








STX 


* 










* 




X 


STY 


* 










* 




Y 


TAX 




N Z. . . 


. .NZ. . 










X 


TAY 




N Z . . . 


. .NZ. . 










Y 


1 TSX 




N Z. . . 


. .NZ. . 











X 


TXA 




N. . . . .Z . . . 


. . NZ . . 










X 


1 TXS 










X+l 






X i 


TYA 




N Z . 


. . NZ . . 










Y 



Reversed Address Bytes 

To reverse the order of high and low 
address bytes on the 6809 from the 
6502, several approaches are possible. 
The most direct method, which still 
maintains an exact emulation, is to 
assume that all extended address bytes, 
except within instructions, are reversed. 
You must include 6809 code of the 
following form to actively flip the ad- 
dress before use: 



TFR CC,DP 
LDU address 
EXG U,D 
EXG A,B 
EXG D,U 

TFRDP,CC 



Save CC Register 

Load Address 

Move Address 

Reverse Bytes 

Put Address in U 

Register 

Restore CC Register 



Executing this code is time- 
consuming and wasteful if it is not 
needed. The definition of the 6502 
.WORD (or - equivalent) assembler 
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pseudo-op code will require defining in 
such a manner as to reverse the bytes of 
its address operands. The TFR instruc- 
tions used above are included to avoid 
disturbing the condition code register; 
most such sections of code will require 
protection of the condition code register. 

In many cases, the programmer may 
decide to use the 6809 rather than 6502 
form of extended addressing, and 
modify the translated program as 
necessary to accomplish this. Then the 
reversal of address bytes as described 
above will not be required and the 6502 
.WORD (or equivalent) assembler 
pseudo-op code will be translated to the 
6809 FDB. The programmer will be re- 
quired to correspondingly modify 
references to the bytes in the program 
representing reversed extended ad- 
dresses. However, this tradeoff pre- 
serves more of the flavor of the 6809 
and less of the 6502 and is hence more 
efficient. 

The 6502 Stack Page Restriction 

The 6502 stack restriction to the 
$01XX address range causes translation 
problems as far-reaching as the reversed 
address bytes situation. Every opera- 
tion involving items placed onto the 
stack or pulled from the stack or the 
setting of the S register must be done 
through special inline code. The trans- 
lator may not directly insert any opera- 
tion, such as a subroutine call, which 
uses the stack. The 6502 S register 
always points to the next available 
location, whereas the 6809 S register 
always points to the last item pushed 
onto the stack. Whether 6502 stack 
emulation is used or not, the translated 
program must initialize the S register. 
Interrupt processing may not be sup- 
ported with the emulated stack. The 
6502 instructions which directly place 
information on the stack are as follows: 
BRK, JSR, PHA, PHP; those which 
directly gather information from the 
stack are: PLA, PLP, RTI, RTA; and 
those which directly use or modify the 
stack pointer are: TSX, TXS. 

The inserted 6809 code to emulate 
the placing of an item onto a 6502 stack 
is of the following form: 



and that of removing of an item from a 
6502 stack is of the following form: 

TFR CC,DP Save CC Register 



STB ,S 

TFR CC,DP 
TFR D,U 
TFR S,D 
DECB 
TFR D,S 
TFR U,D 
TFR DP,CC 



Store B Register in 

Stack 

Save CC Register 

Save D Register 

Bump S Register Down 
Set S Register 
Restore D Register 
Restore CC Register 



TFR D,U 
TFR S,D 

INCB 
TFR D,S 
TFR U,D 
LDB,S 



Save D Register 

Bump S Register Up 
Set S Register 
Restore D Register 
Get B Register from 
Stack 



TFR DP,CC Restore CC Register 



Instructions (such as BRK, JSR, RTI, 
and RTS) that require multiple stack 
operations will require multiple copies 
of these stack push and pull operations 
for exact emulation. Even with the pull 
and push routines, exact 6502 stack 
emulation must be done with inter- 
rupts turned off. The 6502 TXS and 
TSX instructions will require review if 
either the S or the X register is assumed 
to be 16 bits long, as in the 6809 pro- 
cessor. Unless such exact stack emula- 
tion is required in a given situation 
(which it seldom is), most 6502 pro- 
grams will run after translation using 
6809 stack handling with little or no 
change, and with a great increase in ef- 
ficiency and functionality for stack- 
related operations. 



The B, D, and V Flags 

The content differences in the con- 
dition code registers of the 6502 and 
6809 are apparent primarily in the cases 
of interrupt processing and the ADC, 
BIT, BRK, CLD, CLV, PHP, PLP, RTI, 
SBC, and SED instructions. 

The 6502 BRK instruction has no 
exact 6809 counterpart with respect to 
the "B" flag in the condition code 
register. However, if 6502 stack emula- 
tion and condition code register format 
are not required, the 6502 BRK instruc- 
tion may be translated to the 6809 SWI 
instruction, which has a different vec- 
tor address in high memory from the 
IRQ interrupt. 

The 6809 has no direct counterpoint 
to the use of the 6502 "D" flag; 
however, it is modified only by the 
CLD, PLP, RTI, and SED instructions 
and is used only by the ADC and SBC 
instructions. Thus the 6502 "D" flag is 
easily emulated using a separate byte. 
The only difficulties are with the 6809 
SBC instruction, which does not inter- 
face with the DAA instruction, and with 
properly separating and combining 
multiple "D" flag bytes during inter- 
rupt processing. 

(Continued on page 84) 



Decision 
Systems 



Decision Systems 

P.O.Box 13006 
Denton, TX 76203 



SOFTWARE FOR THE APPLE II* 

ISAM-DS is an integrated set of Applesoft routines that gives indexed file 
capabilities to your BASIC programs. Retrieve by key, partial key or sequentially. 
Space from deleted records is automatically reused. Capabilities and performance 
that match products costing twice as much. 
$50 Disk, Applesoft. 

PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 
$35. Disk, Applesoft (48K, ROM or Language Card). 

DSA-DS is a disassembler for 6502 code. Now you can easily dis-assembie any 
machine language program for the Apple and use the dis-assembled code directly as 
input to your assembler. Dis-assembles instructions and data. Produces code com- 
patible with the S-C Assembler (version 4.0), Apple's Toolkit assembler and others. 
$25 Disk, Applesoft (32K, ROM or Language Card). 

FORM-DS is a complete system for the definition of input and output forms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 
$25 Disk, Applesoft (32K, ROM or Language Card). 

UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft's CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 
$25 Disk, Applesoft. 

SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution, improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need 
for garbage clean-up. Author: Lee Meador. 
$15 Disk, Applesoft (32K, ROM or Language Card). 



* Apple 



(Add $4.00 for Foreign Mail) 
I is a registered trademark of the Apple Computer Co. 
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J^ ATARI 




ATARI 800 

16K...$669 
32K...$749 
48K . . . $779 

410 Recorder $76.00 

810 Disc Drive $449.00 

822 Printer $269.00 

825 Printer $629.00 

830 Modem $159.00 

820 Printer $269.00 

850 Interlace $169.00 

New DOS 2 System $29.00 

CX30 Paddle $18.00 

CX40 Joy Stick $18.00 

CX853 16K RAM $77.95 

Microtek 16K RAM $64 95 

Microtek 32K RAM $99.95 

Ramdisk (128K) $429 95 

INTEC 32K Ram $99.95 

iNTEC 48K Ram $199.95 

One year extended warranty — $70.00 

481 Entertainer $69.00 

482 Educator $130.00 

483 Programmer $49.00 

484 Communicator $344.00 




ATARI 400 

16K...$299 
32K...$419 
48K... $519 

Visicalc $179.00 

Letterperlect $109.00 

Ricochet $14.50 

Crush Crumble & Chomp $24.00 

Star Warrior $29.00 

Rescue at Rigel $24.00 

Datesfones $16.00 

Invasion Orion $18.50 

Mission Asteroid $22.00 

MouskATTACK $31.00 

The Next Step $34.00 

Softporn $27.00 

Wlzzard & Princess $29.00 

KBYTE Krazy Shoot Out (ROM) . . $39.00 

Protector (Disk 32K) $24.00 

Jaw Breaker (on line disk) $27.00 

Ghost Hunter (cassette) $24.00 

Ghost Hunter (disk) $30.00 

PAC MAN $35.00 

Centipede $35.00 

Caverns of Mars $32.00 

Synapse 

File Manager 800 $69.95 

Dodge Racer $19.00 

Chicken $24.00 

Slime $24.00 

Nautilus $24.00 

Disk Manager $24.00 

Fort Apocalypse $24.00 

Assembler $39.00 





Texas 
Instruments 



TI-99/4A s 299 

R.F. Modulator $29.00 

Telephone Coupler $169.00 

PHP1200 Peripheral Box $199.00 

PHP1220 RS232 card $143.00 

PHP1240 Disk Controller $199.00 

PHP1250 Disk Drive $319.00 

PHP1260 32K RAM $229.00 

Wired Remote Controllers(Pair) . . $31.00 

PHP Printer Solid State $319.00 

Home Financial Decisions $26.00 

Personal Record Keeping $43.00 

Mailing List $60.00 

Checkbook Manager $18.00 

Tombstone City 21st Century $34.00 

Munch Man $34.00 

Tl Invaders $34.00 

Car Wars $34.00 

Computer 
Covers 

ATTRACTIVE COVERS FOR YOU 
COMPUTER AND DISK DRIVE. 

Atari 400 $6.99 

Atari 800 $6.99 

Atari 810 $6.99 

All Atari Covers are Beige. 

Commodore VIC-20 $6.99 

Commodore 8032 $14.99 

Commodore 8050/4040 $10.99 

All Commodore Covers are Royal Blue. 

Monitors 

Amdek 

300G $169.00 

Color I $339.00 

Color II $699.00 

Color III $429.00 

NEC 

12" B&W $169.00 

12" Color $339.00 

Tl 10" Color $349.00 

Zenith ZVM 121 (Green) $119.00 

BMC 12" Green $85.00 

Televideo 

910 $579.00 

912C $699.00 

920C $749.00 

925C $749.00 

950 $939.00 

802 $Call 

802H $Call 

806 $Cali 

816 $Call 

Modems 

Hayes 

Smart $239.00 

Chronograph $199.00 

Micromodem II $279.00 

Micromodem 100 $309.00 

Novation Auto $239.00 

D Cat $169.00 

Cat $159.00 



TO* HEWLETT 
mL'HM PACKARD 




HP»85 s 1899 

HP» 86 call 

HP«B7 $1769.00 

HP«125 $1999.00 

HP*85 16K Memory Module $169.00 

SV* " Dual Master Disc Drive . . . $1769.00 

Hard Disk w/Floppy $4349.00 

Hard Disk $3440.00 

80 Column Printer $799.00 

"Sweet Lips" Plotter $1149.00 

87 CP/M $399.00 

87 128K Memory $610.00 

87 Visicalc $205.00 

125 & 85 Visicalc $179.00 

HP41CV Calculator 
s 239 

41C $189.00 

11C $104.00 

12C $114.00 

34C $114.00 

38C $114.00 

HP»41 Printer $340.00 

HPIL CALCULATOR PERIPHERALS 

IL Modual $104.00 

Digital Cassette $449.00 

Printer/Plotter $419.00 

Card Reader $164.00 

Optical Wand $99.00 

Apple 

Call for availability and prices 
on all Apple computers and peripherals. 

Printers 

Smith Corona TP1 $699.00 

Centronics 739-1 $519.00 

Centronics 739-3 $619.00 

Diablo 630 Special $1799.00 

Epson 

MX80 w/Graftrax $449.00 

MX80FT Call 

MX100 Call- 
NEC 

8023 $549.00 

7730 Call 

7720 Call 

7710 '...Call 

Okidata 

82A $499.00 

83A $749.00 

84 $1129.00 

Citoh Starwriter 

F10-40 CPS $1469.00 

F10-55CPS Call 

Prowriter $479.00 

Talley 

8024-L $1629.00 

IDS 

Prism $Call 

MPC Apple Parallel 

Board & Cable $69.00 

2 Meter RS232-RS232 $29.95 

Cables Available For Most 
Interfacing Purposes 




8032 s 1039 

4032 $969.00 

4016 $769.00 

8096 Upgrade Kit $369.00 

Super Pet $1599.00 

2031 $529.00 

8250 (Double Sided D. Drive) . . $1699.00 

5 Megabyte Hard Disk $2399.00 

8050 $1299.00 

4040 $969.00 

8300 (Letter Quality) $1799.00 

8023 $769.00 

4022 $599.00 

Pet to IEEE Cable $37.00 

IEEE to IEEE Cable $46.00 

Tractor Feed for 8300 $240.00 

SOFTWARE 
Commodore Magis 
BPI Professional Software 

Visicorp Creative Software 




VIC 20 
$ 239 

Call for price and availability of 
VIC-64 

Commodore Catassette $69.00 

Disk Drive $499.00 

VIC Graphic Printer $339.00 

3K Memory Expander $32.00 

8K Memory Expander $53.00 

16K VIC Expansion $99.00 

RS232C Terminal Interface $43.00 

VIC IEEE-488 Interface $86.00 

VIC 20 Super Expander $53.00 

Programmers Reference Guide ..$15.00 

Introduction to Computing $19.00 

Introduction to BASIC Programming$19.00 

Household Finance $27.00 

VIC Games $19.00 

VIC Home Inventory $13.00 

VIC Rec/Ed II $13.00 

Terminal $13.00 

Un Word $13.00 

Grafix Menagerie $11.00 

VIC PICS... $15.00 

Ticker Tape $13.00 

Banner Headliner $13.00 

RS 232 $39.00 

Super Slot $23.00 

VIC Avengers $23.00 

Super Alien $23.00 

Super Lander $23.00 

Draw Poker $23.00 

Midnite Drive $23.00 



computer mail order 



800233-8950 



477 East Third Street 
WilHamsport, PA 17701 
(717)327-9575 

Patricio Habla Espanol 



CALL TOLL FREE 
HOW TO ORDER: 

In-stock items shipped same day you call. No risk, no deposit on 
C.O.D. orders. Pre-paid orders receive free shipping within the 
continental United States with no waiting period tor certified checks 
or money orders. All prices shown are cash prices add 3% for 
Mastercard and Visa. NV and PA residents add sales tax. All items 
subject to availability and price change. 



W€St 

80O648-33 1 1 

P.O. Box 6689 

Stateline, Nevada 89449 

(702) 588-5654 

Franco Habla Espanol 
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Table 4: Translation Analysis 


Table 4 (Continued) 




6502 Opcode 


6809 Code 


Comments 


6502 Opcode 6809 Code 


Comments 


ADC Operand 


ADC Operand 


Add with Carry 


STA SEVFLG 


Set V Flag Byte 




TFR CC,DP 


Save CC Register 


* Warning: Decimal Flag Not Honored 




TFR CC,A 




TFR DP,CC 


Restore CC Register 




ANDA #$02 




SEC ORCC #$01 


Set C Flag 




STA SEVFLG 


Set V Flag Byte 


SED TFR CC,A 


Save CC Register 




TST SEDFLG 


Check D Flag 


STA SEDFLG 


Set D Flag Byte 




BEQ * + 7 




TFR A,CC 


Restore CC Register 




TFR DP,CC 


Restore CC Register 


SEI ORCC #$10 


Set I Flag 




DAA 


Convert to Decimal 


STA Operand TFR CC,DP 


Save CC Register 




BRA *+4 




STB Operand 


Store Accumulator 




TFR DP,CC 


Restore CC Register 


TFR DP.CC 


Restore CC Register 


AND Operand 


AND Operand 


AND Accumulator | 


STX Operand EXG X,D 


Prepare for Store 


ASL Operand 


ASL Operand 


Arithmetic Shift Left 


TFR CC,DP 


Save CC Register 


BCC Operand 


BCC Operand 


Check C Flag 


STB Operand 


Store X Register 


BCS Operand 


BCS Operand 


Check C Flag 


TFR DP,CC 


Restore CC Register 


BEQ Operand 


BEQ Operand 


Check Z Flag 


EXG D,X 


Restore D and X 


BIT Operand 


ANDA Operand 


Bit Test 


STY Operand EXG Y,D 


Prepare for Store 




* N and V Flags Not Set I 


TFR CC,DP 


Save CC Register 


BMI Operand 


BMI Operand 


Check N Flag 1 


STB Operand 


Store X Register 


BNE Operand 


BNE Operand 


Check Z Flag 


TFR DP,CC 


Restore CC Register 


i BPL Operand 


BPL Operand 


Check N Flag 


EXG D,Y 


Restore D and Y 


; BRK 


SWI 


(Requires Vector) 


TAX LDA #$00 


Clear MS 8 Bits, Not C Flag 




* Interrupt Handler 


May Convert CC Format ! 


TSTB 


Set CC Register 


BVC Operand 


TFR CC,DP 


Save CC Register 


TFRD,X 


Set X to Accumulator 




TST SEVFLG 


Check V Flag Byte 


TAY LDA #$00 


Clear MS 8 Bits, Not C Flag 




BNE * + 6 


Change 6 to 7 for LBRA 


TSTB 


Set Condition Code 




TFR DP,CC 


Restore CC Register 


TFR D,Y 


Set Y to Accumulator 




BRA Operand 


Branch if V Clear 


TSX TFR D,U 


Save D Register 




TFR DP, CC 


Restore CC Register 


TFR S,D 


Get S Register 


BVS Operand 


TFR CC,DP 


Save CC Register 


LDA #$00 


Clear MS 8 Bits, Not C Flag 




TST SEVFLG 


Check V Flag Byte 


DECB 


Correct Value 




BEQ * + 6 


Change 6 to 7 for LBRA ' 


TFR D,X 


Set X Register 




TFR DP,CC 


Restore CC Register 


TFR U,D 


Restore D Register 




BRA Operand 


Branch if V Set 


TXA TFR X,D 


Move X to Accumulator 




TFR DP,CC 


Restore CC Register 


TSTB 


Set CC Register 


CLC 


ANDCC #$FE 


Clear C Flag 


TXS TFR D,U 


Save D Register 


CLD 


TFR CC,DP 


Save CC Register 


TFR X,D 


Get X Register 




CLR SEDFLG 


Clear D Flag Byte 


TFR CC,DP 


Save CC Register 




TFR DP,CC 


Restore CC Register 


INCB 


Correct Value 


CLI 


ANDCC #$EF 


Clear I Flag 


TFR DP,CC 


Restore CC Register 


CLV 


TFR CC,DP 


Save CC Register 


TFR D,S 


Set S Register 




CLR SEVFLG 


Clear V Flag Byte 


TFR U,D 


Restore V Register 




TFR DP,CC 


Restore CC Register 


TYA TFR Y,D 


Move Y to Accumulator 


CMP Operand 


CMPB Operand 


Compare Accumulator 


TSTB 


Set CC Register 


CPX Operand 


EXG D,X 


Prepare for Compare 






CPY Operand 


CMPB Operand 
EXG X,D 
EXG D,Y 


Compare X Register 
Prepare for Compare 














CMPB Operand 


Compare Y Register 








EXG Y,D 








DEC 


DECB 


Bump Accumulator Down 






DEX 


EXG X,D 
LDA #$00 
DECB 
EXG D,X 

EXG Y,D 
LDA #$00 


Prepare for DEX 

Clear MS 8 Bits, Not C Flag 

Bump X Down 

Correct D and X 

Prepare for DEY i 

Clear MS 8 Bits, Not C Flag 


COLOR COMPl 


THE POWERFUL FLEX DISK OPERATING SYSTEM WITH 


DEY 


HUNDREDS OF SOFTWARE PACKAGES IS NOW AVAILABLE! 


DECB 


Bump Y Down 




Now you can run FLEX, OS-9 and Radio 


you can run it and even change it!! You 




EXG D,Y 


Correct D and Y 


Shack disk software on your Color Com- 


can load Color Computer cassette soft- 


EOR Operand 


EORB Operand 


EOR Accumulator 


puter. If you have a 32K Color Computer 


ware and save it to FLEX disk. Single 


INC 


INCB 


Bump Accumulator 


with the Radio Shack disk system, all you 


Drive Copy, Format and Setup com- 


INX 


EXG X,D 


Prepare for INX 


need to do is make a trivial modification 


mands plus an online help system are in- 




LDA #$00 


Clear MS 8 Bits, Not C Flag 


to access the hidden 32K, as described in 


cluded. 




INCB 


Bump X Up 


the Feb. issue of COLOR COMPUTER 


installing FLEX is simple. Insert the 
disk and type: 




EXG D,X 


Correct D and X i 


NEWS and the April issue of '68' Micro. 


, INY 


EXG Y,D 


Prepare for INY 


You can get FLEX from us right now. 




LDA #$00 


Clear MS 8 Bits, Not C Flag 


OS-9 will be ready by summer. Please 


RUN "FLEX" 


INCB 


Bump Y Up 




note that this will only work with the 


That's all there is to it! You are now up 




EXG D,Y 


Correct D and Y 


Radio Shack disk system and 32K/64K 


and running in the most popular disk 


JMP Operand 


JMP Operand 


Jump 


memory chips that RS calls 32K. Maybe 


operating system for the 6809. There are 


JSR Operand 


JSR Operand 


Subroutine Call 


they put 64K's in yours, too. If you don't 


hundreds of software packages now run- 


LDA Operand 


LDA Operand 


Load Accumulator 


have a copy of the article, send a legal 


ning under the FLEX system. Open your 


LDX Operand 


EXG X,D 


Prepare for LDX 


size SASE (40$ stamps) and we'll send it 


Color Computer to a whole new world of 




LDA #$00 


Clear MS 8 Bits, Not C Flag 


to you. 


software with FLEX. 




LDB Operand 


Load Value 


! In case you don't understand how this 


FLEX $99.00 




EXG D,X 


Correct D and X 


works, I'll give you a brief explanation. 


INCLUDES OVER 25 UTILITIES! 


LDY Operand 


EXG Y,D 


Prepare for LDY 


The Color Computer was designed so 


FLEX Editor $ 50.00 




LDA #$00 


Clear MS 8 Bits, Not C Flag 


that the roms in the system could be 


FLEX Assembler S 50.00 




LDB Operand 


Load Value 


turned off under software control. In a 


FLEX Standard BASIC $65.00 




EXG D,Y 


Correct D and Y 


normal Color Computer this would only 


FLEX Extended Business BASIC S100.00 


LSR Operand 


LSR Operand 


Logical Shift Right 


make it go away. However, if you put a 


Other languages available include; 


NOP 


NOP 


No Operation 


program in memory to do something first 


FORTH. Pascal, Fortran77, 'C,' AVBASIC 


ORA Operand 


ORB Operand 


Or Accumulator 


(like boot in FLEX or OS-9), when you turn 


Compiler, plus more. 


PHA 


PSHSB 


Push Accumulator 


off the roms, you will have a full 64K RAM 


Application packages include; A/R, G/L, 


PHP 


* Execute Cond Code Translation from 6809 


System with which to run your program. 


A/P, Inventory, Electronic Spreadsheets, 




PSHSA 


Push 6502 CC Register 


Now, we need the other half of the 64K 


Accounting, Database programs and 


PLA 


PULS B 


Pull Accumulator 


ram chips to work, and this seems to be 


more. SEND FOR LIST. 




TSTB 


Set CC Register 


the case most of the time, as the article 


TRS-80 COLOR COMPUTER COMPLETE 


PLP 


PULS A 


Pull 6502 CC Register 


states. Of course, you could also put 64K 


WITH 64K RAM, 24K ROM, SINGLE DISK 




* Execute Cond Code Translation to 6809 


chips in. 


DRIVE AND FLEX, SET UP AND READY 


ROL Operand 


ROL Operand 


Roll Left 


Some neat utilities are included. 


TO RUN FOR ONLY $1,275. Includes 60 


ROR Operand 


ROR Operand 


Roll Right 


MOVEROM moves Color Basic from 


day extended warranty. If you have a 


RTI 


RTI 


Return from Interrupt 


ROM to RAM. Because it's moved to RAM 


Computer, call about RS disk controllers 


RTS 


* Interrupt Handler May Convert CC Format 
RTS Exit Subroutine 


you can not only access it from FLEX, 


and drives. 


SBC Operand 


SBC Operand 
TFR CC,DP 


Subtract with Borrow 
Save CC Register 


FRANK HOGG LABORATORY, INC. 




TFR CC,A 




j 130 MIDTOWN PLAZA • SYRACUSE NEW YORK 13210 • {315)474-7856 




ANDA #$02 


(Continued) 
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(Continued from page 81) 

The 6809 has more instructions 
that modify the "V" flag than does the 
6502, in which only the ADC, BIT, 
CLV, PLP, RTI, and SBC instructions 
modify the "V" flag. The 6502 "V" 
flag is thus easily emulated in the same 
manner as the "D" flag, with the same 
potential problems during interrupt 
processing. 



Condition Code Register Format 

Since the 6809 condition code 
register has format "EFHINZVC", and 
the 6502 condition code register has 
format "NV0BDIZC", two routines 
must be defined for the 6502 emula- 
tion, one to reformat condition codes in 
each direction. The routines are very 
similar; the following reformats the 
6809 condition code register into 6502 
format: 



TFR CC,DP 


Save CC Register 


TFR D,U 


Save D Register 


TFR CC,A 




CLRB 


Zero 6502 Register 


BITA #$10 


I Flag 


BEQ *+4 




ORAB #$04 




BITA #$08 


NFlag 


BEQ *+4 




ORAB #$80 




BITA #$04 


ZFlag 


BEQ *+4 




ORAB #$20 




TST SEVFLG 


VFlag 


BEQ *+4 




ORAB #$40 




BITA #$01 


CFlag 


BEQ *+4 




ORAB #$01 




TST SEDFLG 


DFlag 


BEQ *+4 




ORAB #$80 




TFR DP,CC 


Restore CC Register 


TFR B,DP 




TFR U,D 


Restore D Register 


TFR DP,A 


6502 CC in A Register 



Again, since most programs never 
(or seldom) require the particular for- 
mat of the 6502 condition code register, 
a programmer may decide to use the 
6809-format condition code register 
and manually change the translated 
program, as required. 

Page Zero Wraparound 

Page zero wraparound is another at- 
tribute of the 6502 which is not present 
on the 6809 and must be handled by the 



translator through additional code if ex- 
act emulation is required. This prob- 
lem occurs in the 6502 zero-page- 
indexed and indexed- indirect address 
modes. In the zero-page-indexed mode, 
the 8 -bit offset in the 6502 instruction 
is added to the 8-bit value in the X or Y 
register to provide an 8 -bit value, 
which is prefixed with 8-bit 00 to pro- 
vide a 16-bit effective address. The 
6809 code inserted by the translator 
would be in the following form: 

TFR CC,DP Save CC Register 
LEAU ((address) AND 



$FF),X 
EXG U,D 
CLRA 
EXG D,U 
TFR DP,CC 
OPC ,u 



Compute Address 

Truncate to 8 Bits 
Address in U Register 
Restore CC Register 
Perform Original 
Operation 



The alternative to emulation would 
be to treat zero-page-indexed address 
mode as if it were absolute- indexed ad- 
dress mode. In this case the program- 
mer would be responsible for ensuring 
that the correct effective address is 
calculated in each case. In the indexed- 
indirect mode, the 8-bit offset in the in- 
struction is added to the 8-bit value in 
the X or Y register to form an 8-bit 
result, which is prefixed by an 8-bit 00 
to form a 16-bit effective address. The 
contents of the locations at that address 
and at the next address are used to pro- 
vide a 16-bit effective address. The 
6809 code inserted by the translator 
would be similar to that provided 
earlier, with the exception of the last 
line, which would use indirect address- 
ing and would be in the following form: 



OPC [,U] 



Perform Original 
Operation 



assuming that no indirect addresses are 
placed at $00FF and $0000. An alter- 
native to emulation would be to directly 
use the 6809 indirect address facility, 
manually correcting any cases in which 
the contents of the X or Y register plus 
the offset exceeds $00FE. 



The 8-Bit Limitation of X and Y 

The 6502 8-bit X and Y register 
limitations affect the following 6502 
instructions: DEX, DEY, INX, INY, 
LDX, LDY, STX, STY, TAX, TAY, 
TSX, TXA, TXS, TYA. In virtually 



every case, the 8-bit value being pro- 
cessed must be moved through the D 
register in order to properly extend or 
truncate the value. For instance, the 
translator-generated 6809 code for INX 
would be: 



EXG X,D 


Move X Register for 




Truncation 


LDA #$00 


Clear MS 8 Bits, Not C 




Flag 


INCB 


Bump Last 8 Bits of X 


EXG D,X 


Restore New X Register 



The magnitude of the problems asso- 
ciated with the conversion of the trans- 
lated program to fully use the 16-bit X 
and Y registers of the 6809 would de- 
pend on the program being translated. 
However, they may be severe, and the 
emulation overhead will usually be 
small. 

Translation Analysis 

Table 4 presents a simplified 
representation of the required trans- 
lator actions in the conversion of each 
6502 instruction to 6809 instructions. 
The following assumptions are made 
implicitly in this table: 

• address mode processing is handled 
separately but always presents a 
16-bit effective address 

• absolute addresses are stored in 6809 
format (high, then low bytes) 

• stack register is handled using 6809 
16-bit format and is not restricted to 
$01XX range 

• format conversion of the condition 
code register is not handled: 

no "B" flag handling is required 
"D" and "V" flags are handled as 
separate flag bytes 

• X and Y registers are restricted to 8 
bits 

• situations such as "too-long" branches 
must be handled by the programmer 
after translation 



Conversion Analysis 

Most computer programs, even on 
microcomputers, do not run stand- 
alone but run under control of an 
operating system or use external I/O, 
math, or service subroutines. Thus, 
even if the translation from 6502 to 
6809 is exactly correct on an 
instruction-by-instruction basis, many 
6502 programs would not run after 
translation without modification. The 



84 



MICRO - The 6502/6809 Journal 



No. 50 -July 1982 






Uersa Computing 






PRESENTS 




VersaWriter 

DRAWING 
TABLET 




COMPLETE HARDWARE / SOFTWARE GRAPHICS SYSTEM - $299 



• Hi-Res & Med-Res Draw 

• Paint Brush-5 Sizes 

• Point to Point / Line Draw 

• Air Brush 



i Color Fill-In 

i Change Color Hue & Intensity 
' Reverse Picture 
Scaling 



• Split/ Full Screen 

• Save / Load / Erase 

• Text Writer 

• Fix X or Y Axis 



Requires: Atari ®300, 32K RAM, Basic Language Cartridge, Disk Drive 



GRAPHICS 
COMPOSER 

PADDLE / JOYSTICK 
GRAPHICS SOFTWARE ■ $39.95 

• Draw on Hi-Res Screens 7 or 8 

• Save Pictures on Disk or Cassette 

• Create Player / Missile Shapes 
Automatically 

• Geometric Figures Program 

• Add Text to Screen 

Requires: Atari'fcOO, 32K RAM, Basic Language Cartridge, 
Disk or Cassette 



GLOBE MASTER 

COMPLETE HhRES 
GEOGRAPHY GAME - $29,95 

• 8 Hi-Res Color Maps 

• U.S.-Europe-World-Asia-Africa-Australia 

• Countries-Cities-Capitals-Oceans- 

Rivers-Mountains, Etc. 

• Several Skill Levels 

Requires: Atari®800, 32K RAM, Basic Language Cartridge, 
Disk 

ATARI ®is a registered trademark of Atari Inc. 



MIND BOGGLERS 



• Capture 

• Mystery Box 

• Simon Says 



THREE STRATEGY GAMES 

CASSETTE $15.95 DISK $19.95 



Requires: Atari®400, 16K RAM, Cassette 
Atari 800, 24K RAM, Cassette or Disk 



Uersa Computing, Inc. 

3541 Old Conejo Road, Suite 104 
Newbury Park, CA. 91320 (805)498-1956 
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VOLUME 3 

JUST 
RELEASEO! 



4MCRO 

on the Apple 



Volume* 



INCLUDES I 
DISKETTE | 




$24.95* 



More than 40 new programs on 
diskette to help you get more from 
your Apple: 

• Machine-Language Aids 

• I/O Enhancements 

• Applesoft Aids 

• Graphics and Games 

• Reference Information 

19 choice articles 

43 tested programs on diskette 

(16 sector DOS 3.3 format) 

Volumes 1 & 2 also available at $24.95* 

Together MICRO on the Apple 1, 

2, & 3 provide more than 110 pro- 
grams on diskette for less than 
$1,00 each. No need to type in 
hundreds of lines of code. 

MICRO makes it easy to order; 
Send check (payable to MICRO) to: 

MICRO INK 
Dapt. MA3 
P.O. Box 6502 
Chelmsford, MA 01824 

Call our toll-free number: 

1-800-345-8112 

(In PA, 1-800-662-2444) 
VISA and MasterCard accepted 

Also available at your local computer store. 

*Add $2.00 shipping per book. 
MA residents add 5%. 



portions of programs requiring change 
in a practical environment will gener- 
ally be in the following areas: 

• monitor operating system, and 
subroutine library entry points 

• I/O addresses and hardware 

• memory-mapped video facilities 

• miscellaneous tradeoffs made in 
translation. 

Entry points may cause difficulties 
in terms of addresses, parameters, and 
functions. The address problems are 
usually the simplest to solve, since 
these generally involve merely chang- 
ing addresses in EQU statements. The 
parameter-passing problem encom- 
passes addresses and values passed to 
and from subroutines, monitor entry 
points, and operating system routines, 
and may be far more complex. The 
number of variations in table and con- 
trol block format and usage, control 
value interpretation, data structure 
representation, method of returning 
results, etc., is astronomical. 

The best plan of attack on these 
problems varies with the nature of the 
effort. In the case of a well-defined 
subroutine library or set of operating 
system routines being referenced, it 
may be possible and advantageous to 
code a set of 6809 routines to interface 
to a similar functional library or 
routines. Then this interface may be 
used in any program with few other 
changes in logic required. 

I/O address and hardware differ- 
ences may cause problems in conver- 
sion. Simply changing the EQU state- 
ments will probably not affect the com- 
plete conversion because of the dif- 
ferences in handling of the various I/O 
devices, such as VIO's, VIA's, PIA's, 
ACIA's, etc. These differences may be 
handled by coding interface subrou- 
tines, by modifing the code to handle 
the new I/O device in native mode, by 
using similar functional routines 
already available in the 6809 operating 
system, etc. In the worst case, the 6502 
hardware facility may not even be 
available on the 6809, requiring exten- 
sive modifications. 

Memory-mapped video facilities are 
available on many of the appliance 
computers as standard features but are 
not generally directly available on 6809 
systems, with the notable exception of 
the Radio Shack Color Computer, If a 
6502 program makes extensive use of 
memory-mapped video hardware, but 
the facility is not available on the 6809 
or is available but is handled differently, 



several methods of translating the run- 
ning 6502 program to become a running 
6809 program are possible. The obvious 
means of performing the conversion, 
though sometimes the most difficult, 
would be to rewrite the 6502 code after 
translation to drive the video board or 
terminal used on the 6809 directly. 
Another method would be to write a 
terminal emulation routine which 
would make the same output appear on 
an output device on a 6809 as on a 
video monitor on a 6502. The method 
used in a given case will depend upon 
the situation. 

The other primary reason for 
manual intervention in the conversion 
process involves the tradeoffs made in 
the translation. The changes required 
by this may benefit from some of the 
same organized attacks as suggested for 
the I/O and hardware problems. Other 
changes may be desirable to take ad- 
vantage of the additional instructions 
and addressing modes of the 6809 ver- 
sus the 6502. 

Summary 

The preceding discussion has 
presented a method to convert 6502 
source programs to 6809 source pro- 
grams. This conversion is performed in 
two phases. 

The first phase is a low-level 
(instruction-by-instruction) translation 
process which could be performed 
manually or by using a computer pro- 
gram. The instruction emulation level 
may be varied to cause the translated 
program to have certain attributes 
closer to the 6502 or to the 6809 ar- 
chitectures, as desired. 

The second phase is higher-level, 
and must generally be performed 
manually (although possibly with the 
assistance of an editing or special- 
purpose computer program) since it 
usually involves creativity and 
cleverness on a level not yet found in 
the most advanced computer programs. 
This process involves the resolution of 
the remaining differences between the 
translated 6502 program and the 6809 
environment in which the 6809 pro- 
gram will run, and the final debugging 
and checkout. 

Tables summarizing the instruction 
sets of the 6502, 6800, and 6809 pro- 
cessors follow. 

Edgar Pass may be contacted at Computer 
Systems Consultants, Inc., 1454 Latta 
Lane, Conyers, GA 30207. 
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TURN YOUR APPLE 
PERSONAL COMPUTER 
INTO A PROFESSIONAL 
COMPUTER FOR $750. 



The majority of all professional computer soft- 
ware programs available today are written for the 
CP/M® disk operating system. The SYNERGIZER 
lets you access all of this vast body of sophisti- 
cated software with your Apple II while retaining 
the capability to access your present Apple 
software. 

In addition to the CP/M interface and software 
diskette, the SYNERGIZER gives you 
the required 80 column dis- 
play and 16K RAM 



memory expansion boards, the CP/M Handbook 
by Rodnay Zaks, and complete manuals. You get 
everything you need for fast, easy installation and 
operation in one package.* Each element is de- 
signed to complement the others, and everything 
is designed and produced by the same company. 

The SYNERGIZER. It'll turn your Apple 

into a professional computer. And it costs only 

$750. Phone or write us, or ask your 

dealer for a SYNERGIZER 

brochure. Now. 
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Manufactured by Advanced Logic Systems, 

1195 East Arques Avenue, Sunnyvale, CA 94086, (800)538-8177 (in California (408)730-0306) 

Apple and Apple li are registered trademarks of Apple Computer, Inc., 

CP/M is a registered trademark of Digital Research, Inc., 

The CP/M Handbook is copyrighted by Sybex ; Inc. 

And the SYNERGIZER was our idea. 

*All SYNERGIZER Components are also sold separately. 
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Auto Entry for the CI P 



by Allan J. Zadiraka 



This utility program provides the 
C1P with easier keyboard entry 
of machine-language programs. 
It also provides a scrolling 
screen display of the machine- 
code entries in either a hex 
dump or an object code listing 
format. 



Auto Entry 

requires: 

OSIC1P 

May be modified for other 
computers 






Recently, the failure of a cassette tape 
recorder resulted in the loss of a 
500-byte program that had been entered 
using the ROM monitor in my OSI 
CI P. This event provided the incentive 
I needed to produce a program to reduce 
the effort required for keyboard entry of 
machine-language programs. The first 
pass at the program was based on only 
two objectives: 

1 . To reduce the number of keystrokes 
needed to enter a program by elim- 
inating the need for a carriage return 
after entering each byte of data (Auto 
Entry]. 

2. To utilize the video display capabili- 
ties of the C1P to provide a scrolling 
screen display of address and data 
entries. 

The initial version of the program 
proved its worth when it was used to 
enter a published version of a 4K ex- 
tended monitor for the C1P. However, 
this experience showed the need to add 
several control functions to the pro- 
gram to simplify its use. The listing 
shows the second version of the pro- 
gram, which allows: 

• the ability to return to the monitor or 
to establish a new start address 
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without having to resort to the 
BREAK key 

• display of the entered data in either a 
hex dump format of eight bytes per 
line, or in an object code listing for- 
mat of one, two, or three bytes per 
line. 

• display of current address on the 
same line as the data or on a separate 
line 

• backspacing to allow correction of a 
data entry. 

The program occupies 248 bytes of 
memory and is located in the first page 
of BASIC workspace. 

After the program has been loaded 
using the monitor, the start address of 
the program ($0300) is entered in the 
monitor display, and "G" is pressed to 
begin execution of the program. The 
program will display a "?", asking 
where the data is to be stored. After the 
four hex characters required to specify 
the address have been entered, the cur- 
rent address is displayed. If the program 
is working, this should be identical to 
the starting address entered. 

The program then switches to the 
data entry mode. As each hex character 
is entered, it is displayed with a space 
automatically inserted between succes- 
sive pairs of hex characters. Similar to 



Figure 1: 
Format 


Screen Display for Hex Dump 


70300 
0300 
20 EB 


03 
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00 
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0308 
3F 20 
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BF 


20 


78 


03 


48 


0310 
B5 F7 


30 


- 











the C1P monitor, the display shows the 
data entered and not the contents of the 
specified address. It will appear that 
you are writing data into ROM memory 
or non-existent memory if the current 
address is not selecting a valid RAM 
location. After eight bytes of data have 
been entered, the current address will 
be re-displayed on a new line and eight 
more bytes of data will be allowed. 

Hitting "Z" toggles the program 
between the hex dump format shown 
in figure 1 and the object code format 
shown in figure 2. The CIP's 24-char- 
acter line dictates the need for the two 
data entry display formats. In the hex 
dump format, eight bytes of data just fit 
on one line, requiring the address to be 
shown on a separate line. For the object 
code format I wanted to show the ad- 
dress on the same line as the data, 
similar to an object code listing. If a 
longer line length is possible on a 
specific machine, the toggle feature 
may be deleted from the program. 
Alternately, 16 bytes of data could be 
shown on a line, rather than eight, if at 
least a 48-character line is available. A 
48-character line is supposedly avail- 
able with the C1P Series 2 machines. 



If fewer than eight bytes of data 
have been entered, pressing the 
RETURN key will end the current data 
line and then display the current ad- 
dress. The use of the the RETURN key 



Figure 


2: Screen Display 


for Object 


Code Format 
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is necessary to end a line if the object 
code format is desired. 

The program will come up in the 
hex dump format when initially ex- 
ecuted. If you want to have the program 
come up in the object code format, the 
contents of address $0336 should be 
changed from $18 (CLC] to $38 (SEC) 
before the program is saved on tape. 
"Z" toggles this byte between these 
two values to change the display mode. 

"R" decreases the current address 
by one and shows the new current ad- 
dress. This feature can be used to 
backspace to the point where an entry 
error occurred. The correct data can 
then be re-entered from that point on. 
"O" will start the program again to 
allow a new starting address or origin to 
be set. 

The ESCAPE key causes a return to 
the CIP's monitor. When the "G" is 
pressed, the CIP's monitor executes 
programs by an unconditional jump to 
the program. Therefore the exit back to 
the monitor also must be executed by 
an unconditional jump (JMP). If this 
program is to be used with an extended 
monitor that executes programs as sub- 
routines, the return to the monitor 
should be changed to a return from sub- 
routine (RTS) as noted in the listing. 
Otherwise you will end up back in the 
CIP's ROM monitor instead of the ex- 
tended monitor. 

This utility reduces the time it 
takes to enter programs by fully 50%. 
Most of the time is saved in the key- 
stroking process: 33% fewer are now 
needed. And when you lose track of ex- 
actly where you are when keying a pro- 
gram in, you now do not have to use 
the monitor to step through memory to 
find your place. 

The use of an assembler would, in 
theory, eliminate the need to enter ob- 
ject code from the keyboard. However, 
if you are limited to hand assembly of 
programs, or you want to enter the ob- 
ject code from a published program 
without having to type in all the source 
code, you'll appreciate the features of 
this program. 



Mr. Zadiraka is an electrical engineer 
involved in the development of 
instrumentation and control systems for 
coal-fired power plants. He has an OSI 
C1P with 8K of memory and a balky 
cassette recorder. His address is 4110 State 
Road, Akron, Ohio 44319. 











; ***###*****#********-< 


-******-****** ; 










; RUTO ENTRY UTILITY 


PROGRAM ; 










; Version 


2.0 


; 










; RJ 


ZRDIRAKA AUGUST 14,1981 ; ! 










; ****#*#*************■■ 


#**##**#**##; 










; ZERO 


PAGE TEMPORARY 


STORAGE 










RDRLO 


= *FE 


; CURRENT ADDRESS 










flBRHI 


-RDRLO+I 












TEMP 


= *F9 












TEMPCH 


= *FA 












FLAG 


= $F7 


; SPECIAL COMMAND FUNCTION , 










JCIP ROM UTILITY ADDRESSES 










CRTPRN 


=*BF2D 


; PRINT CHRR IN flCCUM ON 










! 






SCREEN RT CURSOR L0CRTI0N 










LEGRL 


=*FE93 


; CONVERT ASCII TO HEX 










j 






<*80 IF NOT HEX) 










! 

INCHfiR 


=*FEE9 


;GET CHAR FROM KEYBOARD 










MONTR 


=$FE43 

. =$0300 


JCIP MONITOR 

JSTRRT RDDRESS OF PROGRRM 


1 0300 


: 20 


ED 


03 


RUTOEN 


JSR 


CRLF 


IPRINT <CR-LF> 


0303 


: fi0 


00 






LDY 


#0 




0305 


: 84 


F7 






STY 


FLAG 


JCLERR SPECIRL FUNC FLRG 


6307 


: R9 


3F 






LDR 


ft ' ? 


; PROMPT USER WITH '?' 


; 0309 


: 20 


2D 


BF 




JSR 


CRTPRN 




03SC 


: 20 


78 


83 




JSR 


GETBYT 


; INPUT HI BYTES OF RDDR 


030F 


: 48 






} 


PHA 




; CHECK FOR SPECIRL COMMAND 


j 0310 


: R5 


F7 






LDR 


FLAG 


; FUNCTION KEY 


0312 


: 30 


5D 






BMI 


CEGLCH 


; IF SO, DO FUNCTION 


0314 


: 68 








PLA 






0315 


: 85 


FF 




' 


STA 


ADRHI 


;else save byte 


0317 


: 20 


78 


03 




JSR 


GETBYT 


;get lo byte of addr 


031R 


: 43 






j 


PHA 




; CHECK FOR SPECIAL COMMAND 


03 IB 


: R5 


F7 






LDA 


FLAG 


; FUNCTION KEY 


03 ID 


: 30 


52 






BMI 


DEGLCH 


; IF SO, DO FUNCTION 


1 03 IF 


: 68 








PLA 






0320 


• 85 


FE 




s 


STR 


RDRLO 


;else save byte 


0322 


84 


F7 




NEWLIN 


STY 


FLRG 


JCLERR SPECIAL FUNC FLAG 


0324 


20 


ED 


83 




JSR 


CRLF 


|PRINT<CR-LF> 


0327 


fl5 


FF 






LDR 


RDRHI 


IPRINT CURRENT RDDRESS 


6329 


20 


CF 


03 




JSR 


UNPRCK 




032C 


R5 


FE 






LDR 


RDRLO 




032E 


20 


CF 


03 




JSR 


UNPRCK 




0331 


R9 


20 






LDA 


#*20 


; PRINT SPACE 


0333 


20 


2D 


EF 




JSR 


CRTPRN 




0336 


18 






MODE 


CLC 




;M0DE CHANCE <CLC OR SEC) 


0337 


90 


93 






BCC 


NOCRLF 




0339 


20 


ED 


03 




JSR 


CRLF 




033C 


fl2 


08 




NOCRLF 


lux 


#8 




033E 


20 


7 8 


03 


LOOP 


JSR 


GETBYT 


; INPUT BYTE (TWO ASCII CHRR) 


0341 


48 








PHR 




; CHECK FOR SPECIAL COMMAND 


0342 


A5 


F7 






LDR 


FLRG 


; FUNCTION KEY 


0344 


30 


13 






EMI 


SPCL 


; IF SO, DO FUNCTION 


0346 


68 








PLR 






6347 


91 


FE 






STR 


C RDRLO) , Y 


[ELSE SAVE BYTE IN ADDR 


0349 


E6 


FE 






INC 


RDRLO 


JTHEN INC ADDRESS 


034B 


D0 


02 






BNE 


SKIP 




034D 


E6 


FF 






INC 


RDRHI 




034F 


R9 


20 




SKIP 


LDA 


#*20 


J PRINT SPACE BETWEEN BYTES 


0351 


20 


2D 


BF 




JSR 


CRTPRN 




0354 


CR 








BEX 




5 BYTE COUNT 


0355 


F0 


CE 






EEQ 


NEWLIN 


; IF 3TH BYTE THEN NEW LINE 


0357 


D0 


E5 






BNE 


LOOP 


JELSE GET NEXT BYTE 


, 0359 


68 






SPCL 


PLA 






035R 


C9 


OB 






CMP 


#*0D 


;CARRIAGE RETURN? 


035C 


F0 


C4 






BEQ 


NEWLIN 


JSTART A NEW LINE 


035E 


C9 


52 






CMP 


#'R 


;KEY R < REVERSE)? 


0360 


D0 


0B 






BNE 


CK1 




0362 


R5 


FE 






LDR 


RDRLO 


;DECREASE RDDRESS 


0364 


D0 


02 






BNE 


SI 




0366 


C6 


FF 






DEC 


RDRHI 




8368 


C6 


FE 




SI 


DEC 


RDRLO 




036R 


4C 


22 


03 




JMP 


NEWLIN 




036D 


C9 


5R 




CK1 


CMP 


#"2 


;KEY Z (MODE CHANGE)? 


036F 


F0 


Bl 






BEG 


NEWLIN 


JSTRRT R NEW LINE 
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0371 


: C9 


4F 




DEGLCH 


CMP 


#'0 


KEY <ORGIN>? 


0373 


: F© 


SB 






BEQ 


RUTOEN 


SET NEW RDDRESS 


0375 


: 4C 


43 


FE 




J MP 


MONTR 


IF ESC KEY (MONITOR) OR I 














;0R ERROR THEN 














;RETURH TO MON I TOR •< CHANGE 














;T0 RTS IF ENTERED BV JSR> 


0378 


: 20 


R3 


03 


GETBYT 


JSR 


GETCH 


INPUT FIRST HEX CHAR OF BYTE 


037E 


: 48 








PHA 




ICHECK FOR SPECIAL COMMAND 


037C 


: A5 


F7 






LDA 


FLAG 


FUNCTION KEY 


037E 


: 30 


21 






BMI 


EXIT1 


IF SO EXIT SUBROUTINE 


0380 


: 68 








PLA 






0381 


: 0R 








RSL 


A 




8382 


: 0R 








RSL 


A 


SHIFT TO 4 MSB'S 


0383 


: 0R 








RSL 


A 




0384 


: 0R 








RSL 


A 




0385 


: 85 


F9 






STR 


TEMP 


SAVE IT 


0387 


: R5 


FR 






LDR 


TEMPCH 


RECALL ASCII 


0389 


: 20 


2D 


BF 




JSR 


CRTPRN 


& PRINT ON SCREEN 


038C 


: 20 


R3 


03 




JSR 


GETCH 


INPUT SECOND HEX CHAR 


038F 


: 48 






! 


PHfl 




{CHECK FOR SPECIAL COMMAND 


0390 


: R5 


F7 






LDR 


FLAG 


FUNCTION KEY 


0392 


: 30 


0D 






BMI 


EXIT1 


IF SO EXIT SUBROUTINE 


0394 


: 68 








PLfl 






0395 


: 05 


F9 




! 


ORR 


TEMP 


COMBINE WITH 1ST HEX 


0397 


: 85 


F9 






STR 


TEMP 


& SAVE BYTE 


0399 


: A5 


FR 






LDA 


TEMPCH 


RECALL ASCII 


039B 


: 20 


2D 


BF 




JSR 


CRTPRN 


& PRINT IT 


039E 


: R5 


F9 






LDA 


TEMP 


RECALL BYTE 


03R0 


: 60 








RTS 






03A1 


: 68 






EXIT! 


PLA 






03R2 


: 60 






} 


RTS 






03A3 


: 20 


E9 


FE 


GETCH 


JSR 


INCHAR 


GET ASCII CHAR FROM KEYBOARD 


83R6 


: C9 


0D 






CMP 


#*0D 


CR KEY? 


03R8 


: F0 


Ifl 






BEQ 


EXIT2 




63flfl 


C9 


IB 






CMP 


#$1B 


ESC KEY 


03RC 


F0 


16 






BEQ 


EXIT2 




03RE 


C9 


52 






CMP 


#'R 


BACKSPACE 


03E0 


F0 


12 






BEQ 


EXIT2 




03E2 


C9 


4F 






CMP 


tt-'O 


ORIGIN 


03B4 


F0 


0E 






BEQ 


EXIT2 




B3B6 


C9 


5R 






CMP 


#-z 


MODE CHANGE 


03B8 


D0 


0D 






BHE 


LI 




03BR 


48 








PHfl 






03BB 


R9 


20 






LDA 


#*00 100000 




03BD 


4D 


36 


93 




EOR 


MODE 


TOGGLE MODE BETWEEN 


03C0 


8D 


36 


03 




STR 


MODE 


CLC AND SEC 


03C3 


68 








PLR 






03C4 


C6 


F7 




EXIT2 


DEC 


FLAG 


SET UP SPECIAL FUNCTION 










» 




;KEY FLAG 


03C6 


60 








RTS 






03 C 7 


85 


FR 




LI 


STR 


TEMPCH 


SAVE ASCII 


03 C 9 


20 


93 


FE 




JSR 


LEGAL 


CONVERT ASCII TO HEX CHAR 


03CC 


38 


D5 






BMI 


GETCH 


IF NOT HEX, TRY AGAIN 


03CE 


60 






! 


RTS 






03CF 


48 






UNPACK 


PHR 




; CONVERT R BYTE TO 2 ASCII CHRR 


03D0 


4fl 








LSR 


A 


AND PRINT THE ASCII CHARS 


03D1 


4fl 








LSR 


A 




03L2 


4R 








LSR 


A 




03D3 


4R 








LSR 


A 




03D4 


20 


E4 


03 




JSR 


CONVRT 




03D7 


20 


2D 


BF 




JSR 


CRTPRN 




03Dfl 


68 








PLA 






03DB 


29 


0F 






AND 


#$0F 




03DD 


20 


E4 


03 




JSR 


CONVRT 




03E0 


20 


2D 


BF 




JSR 


CRTPRN 




03E3 


60 








RTS 






03E4 


09 


30 




CONVRT 


ORA 


#*30 




03E6 


C9 


3fi 






CMP 


#*3A 




03E8 


90 


02 






BCC 


PASS 




03Efl 


69 


06 






ADC 


#$06 




03 EC 


60 






PASS 

5 


RTS 






03 ED 


R9 


0D 




CRLF 


LDR 


#*BD ; 


PRINT A CARRIAGE RETURN 


03EF 


20 


2D 


BF 




JSR 


CRTPRN 




03F2 


R9 


0R 






LDR 


#$0A ; 


PRINT A LINE FEED 


03F4 


20 


2D 


BF 




JSR 


CRTPRN 




03F7 


60 








RTS 




AlCftO 



zn z 

New Publications 



Microcomputer Experimentation with 
the MOS Technology KIM-1, by Lance 
A. Levanthal. Prentice-Hall, Inc. [Engle- 
wood Cliffs, NJ 07632), 1982, 467 
pages, 6 3 A x 9 l A inches, paperback. 
ISBN: 0-13-580779-4 $16.95 

An easy-to-follow guide to MOS Tech- 
nology KIM-1 experiments, which in- 
cludes an overview, two major group- 
ings of experiments, and a list of 
references. 

CONTENTS: Laboratory — Basic Opera- 
tions; Laboratory 1 — Writing and Running 
Simple Programs; Laboratory 2 — Simple 
Input; Laboratory 3 — Simple Output; Lab- 
oratory 4 — Processing Data Inputs; Labora- 
tory 5 — Processing Data Outputs; Labora- 
tory 6 — Processing Data Arrays; Laboratory 
7 — Forming Data Arrays; Laboratory 8 — 
Designing and Debugging Programs; Labor- 
atory 9 — Arithmetic; Laboratory A — Sub- 
routines and the Stack; Laboratory B — In- 
put/Output Using Handshakes; Laboratory 
C — Interrupts,- Laboratory D — Timing 
Methods; Laboratory E — Serial Input/Out- 
put; Laboratory F — Microcomputer Timing 
and Control; Appendices; References; Index. 

Speaking Pascal: A Computer Language 
Primer, by Kenneth A. Bowen. Hayden 
Book Company, Inc. (50 Essex St., 
Rochelle Park, NJ 07662), 1981, 236 
pages, 5% x 9 inches, paperback. 
ISBN: 0-8104-5164-6 $11.95 

A ten-chapter introduction to program- 
ming in Pascal, written in a non- 
mathematical language that requires no 
technical background or previous pro- 
gramming experience to understand. 

CONTENTS: Preface; First Words; Simple 
Conversations; Controlling the Conversa- 
tion; Sophisticated Conversations; Last 
Words; Index. 

Computer Choices , by H. Dominic 

Covvey and Neil Harding McAlister. 

Addison-Wesley (Reading, MA 01867), 

1982, 225 pages, 6% x 9 l A inches, 

paperback. 

ISBN 0-201-101 13-0 $8.95 

Computer Choices is designed to alert 
potential consumers to the pitfalls of 
purchasing a computer system. It dis- 
pells the myth that all computers are 
easy to use and gives advice on choos- 
ing and implementing the right com- 
puter system for home or office. 

(Continued on page 117) 
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CAN'T AFFORD SOFTWARE? 

READ THIS: 

If the high price of commercial soft- 
ware and the lack of clear information 
about your microcomputer has got you 
down, here's the solution you've been 

waiting for! 

SoftSide Magazine 



SoftSide is a favorite of computer users and 
hobbyists alike. They rely on it as a prime source 
of programs, reviews and articles for the Ap- 
ple™, ATARI®, and TRS-80® microcomputers. 
SoftSide is the magazine for the microcom- 
puter owner who wants to learn BASIC pro- 
gramming, learn MORE about BASIC pro- 
gramming, or just wants to have FUN! 
SoftSide gives you the BASIC code listings 
of several programs — adventures, 
utilities, games, simulations, you name it 
— for your computer EVERY MONTH. 

There's more: 

Reviews — of the software and hard- 
ware products you want to know 
about. 

Articles — about all aspects of 
BASIC programming. 
Tutorials — on graphics, use of im- 
portant commands, and more. 
Programs — each month SoftSide 
publishes a variety of program for the 
Apple, ATARI® and TRS-80®. 



Columns — which discuss different topics in- 
cluding: computer graphics, picking the right 
modem for you and marketing your software — 
just to name a few. 

• Input from our readers — each month we 
devote a space in the magazine to let our 
readers give us some feedback about SoftSide. 

• Hints & Enhancements — programmers and 
readers provide us with enhancements, to our 
programs, and programming tips. 

Use coupon to order. Mail to: SoftSide Publica- 
tions, 6 South St., Milford, NH 03055 

As you can see, you'll receive pages and 
pages of information and entertainment 
from SoftSide. Here's the best part: 

A subscription to SoftSide is just $24 a 
year. That's 12 issues for only $2 each! 
What a value! 



I — I YES! Send me the first copy of my 
SoftSide subscription right away! 

$24/yr for USA and Canada only. For orders to APO/FPO 
or Mexico — $40/yr. Other foreign orders — $62/yr. 



I own a □ Apple □ ATARI® □ TRS 



Name _ 
Address 



City/State 



-Zip. 



□ Check is enclosed 

□ MasterCard □ VISA 

Name of Cardholder 



MC# and lnterbank#/VISA# 

Exp. Date 

Signature 



r 
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Updates and 
Microbes 



"Zoom and Squeeze" Update 

Bob Perkins of Tussy, OK, offered 
the updates in listing 1 (see below) to 
Gary B. Little's "Zoom and Squeeze" 
article. Little's article most recently 
appeared in MICRO on the Apple, 
Volume 1, and originally in MICRO 
26:37. 



Co-Author Omission 

Editor's Note: We apologize for not 
crediting Daniel P. Gerhty with his 



share of the work on the article 
"Microcomputer Interfacing: FORTH 
vs. BASIC," MICRO 49:77. Mr. Ger- 
hty 's name was ommitted from the 
Table of Contents and byline. Also in- 
advertently omitted was acknowledg- 
ment of the authors' research advisors, 
Professors K.S. Peters and V. Vaida, for 
whose support the authors express 
their appreciation. 

May Data Sheet Credits 

Editor's Note: The chart on page 2 
of the PET/CBM Data Sheet (May '82, 



page 108) needs further explanation. It 
applies not only to the PET, but also to 
CBM and VIC models. The chart was 
designed by Jim Butterfield and pub- 
lished in The Transactor (Vol. 3, #4). 
Our apologies to Jim Butterfield for not 
giving him the credit he deserves. The 
MICRO staff corrected a couple of 
minor errors and greatly improved the 
readability of the graphic characters. 



Zoom and Squeeze Listing 


Zoom and Squeeze Listing ( 


continued) 










I860 * ZOOM ftNO SQUEEZE <' MICRO APPLE > 


8333- B0 8B 1528 


BCS FIN 


NO, THEN 








1810 * SLON LIST MODIFIED BV 


033B- C6 24 1530 


DEC CH 










1020 * BOB PERKINS 9/3/31 


8330- 68 1540 


PLft 


PLACE CHftR IN 








1030 * CNTRL Q * 33 CHftR WINDOW 


833E- 90 08 82 1550 


STft IN,X 


INPUT BUFFER 








1040 * CNTRL N = NORMftL WINDOW 


8341- E8 1560 


I NX 


BUFFER FULL? 








1850 * CNTRL 2 = CURSOR TO END OF 


8342- 08 E8 1576 


BNE LOOP 


NO j. THEN ft GAIN 








1060 * LINE WITH COPV 


8344- Cft 1588 


OE.X 


ITS FULL 








1078 * 'S' = SLOH LIST 


0345- 66 1598 


RTS 


SO RETURN 








1030 * -F- = FAST LIST 


0346- 68 1608 FIN 


PLft 


BACK UP CH 








1690 * SPftCE = STOP LIST 


0347- C6 24 1610 


DEC CH 


TO LEftUE CURSOR 








1180 *-■ RETURN- = ftBORT LIST 


8349- C6 24 1620 


DEC CH 


AT END OF LINE 


0021- 






1110 WIDTH .EQ $21 


034B- C9 8E 1638 CTRLN 


CMP #$8E 




8824- 






1120 CH .EQ $24 


834D- 00 06 1640 


BNE RTS1 




8628- 






1130 BftSL .EQ $28 


634F- ft9 28 1658 


LDft #40 


RESTORE WINDOW 


9638- 






1148 KSWL .EQ $38 


0351- 35 21 1666 


STft HIOTH 




0200- 






1158 IN .EQ $208 


6353-- ft9 8D 1678 


LDft #$80 




FD1B- 






1160 KEVIN .EQ $FD1B 


8355- 66 1688 RTS1 


RTS 




0008" 






1178 FLAG .EQ $83 


8356- C9 80 1690 SLOW 


CMP #$SD 


CR ? 


C600- 






1188 KEVBO .EQ $C880 


8358- 08 30 1700 


BNE CHROUT 


NO, THEN RTS 


C010- 






1190 STROBE .EQ $C618 


635A- 2C 06 C8 1716 


BIT KEVBD 


VES,KEV PRESS 


FCftS- 






1280 MON.DELftV .EQ $FCft8 


8350- 18 20 1726 


BPL WftIT 


NO, THEN 


FDF6- 






1210 M0N.C0UT1 .EQ $FDF8 


835F- fiO 60 CO 1736 


LOft KEVBD 


VES,SEE WHAT 


90BF- 






1220 DOS. WftRMSTftRT . EQ $3DBF 


8362- 2C 10 C8 1740 


BIT STROBE 


IT WAS 








1238 .OR $308 


6365- C9 fiO 1750 


CMP #$A6 


SPACE THEN 


0300- 


m 


1ft 


1248 STRRT LDft #INHK 


8367- F8 27 1768 


BEQ STOP 




0302- 


85 


38 


1250 STfi KSWL 


8369- C9 8D 1778 


CMP #$8D 


CR, THEN 


0304- 


ft9 


83 


1268 LDft /INHK 


836B- Fa 28 1786 


BEQ ftBORT 




0308- 


85 


39 


1278 STft KSWL+1 


036D- C9 03 1790 


CMP #$D3 


"'S' 


8308- 


20 


Eft 83 1230 JSR $3Eft TELL DOS 


036F- 00 06 I860 


BNE CTRLF 


NO, SO BRANCH 


0308- 


A9 


56 


1298 LDft #SL0W 


0371- ft9 81 1810 


LDft #1 


VES, 


030D- 


80 


53 ftft 1300 STfi $ftft53 


0373- 35 08 1826 


STft FLftG 


SET FLftG 


0310" 


AS 


93 


1310 LOft /SLOW 


6375- 08 08 1836 


BNE WftIT 


. . ftLWAVS 


9312- 


80 


54 ftft 1320 STft $Rft54 DOS HOOK 


0377- C9 Cb 1848 CTRLF 


CMP #$C6 


"F- J 


0315- 


ft9 


00 


1330 LDft #0 CLEftR FLftG 


0379- 00 04 1856 


BNE WftIT 


NO, THEN BRANCH 


0317- 


85 


03 


1340 STft FLftG 


0376- ft9 80 I860 


LDft #0 




0319- 


80 




1358 RTS 


037D- 85 88 1870 


STft FLAG 


CLEAR FLAG 


03 1ft- 


20 


IB FD 1369 INHK JSR KEVIN 


03 PF- ft5 88 1388 WftIT 


LDft FLftG 


FLAG STATUS 


0310- 


C9 


91 


1370 CMP #$91 CNTRL 


8381- F8 85 1886 


BEQ . 1 


CLEAR, DONT WAIT 


031F- 


00 


07 


1338 BNE CTRLZ 


8333- ft9 66 1980 


LOft #$O0 


LONG UFI BV 


0321- 


H9 


21 


1390 LDft #$21 


0385- 20 ft8 FC 1918 


JSR MON.DELftV 


0323- 


85 


21 


I486 STft WIDTH 


9388- ft9 80 1928 .1 


LDft #$80 




0325- 


ft9 


80 


1418 LOft #$8D 


0380- 4C F8 FO 193B^GHR0UT 


JMP HON 


. Oil |T1 


0327- 


60 




1428 RTS 


833D- 4C BF 3D 1940 ftBORT 


JMP DOS. WftRMSTftRT 


0328- 


C9 


9A 


1430 CTRLZ CMP #$9ft 


0396- 2C 08 C6 1950 STOP 


BIT KEVBD 


KEVPRESS 


832ft- 


00 


IF 


1448 8NE CTRLN 


8393- 18 FB I960 


BPL STOP 


NO, THEN LOOP 


032C- 


A4 


24 


1458 LOOP LDV CH 


0395- ftD 60 CO 1970 


LDft KEVBD 




032E- 


81 


28 


1460 LDft ( BftSL ),V 6ET CHftR 


0398- 30 18 C0 1936 


STft STROBE 


CLEAR STROBE 


6338- 


48 




1470 PHft fiND SftUE IT 


839B- C9 8D 1996 


CMP #$8D 


CR 


S331- 


£6 


24 


I486 INC CH 


8390- F0 EE 2600 


BEQ ABORT 




0333- 


E6 


24 


1498 INC CH 


639F- 36 DE 2016 


BMI WAIT 


. . ftLWAVS 


8335- 


A5 


24 


1580 LOft CH 


03ft 1- 2826 Z.ENO 


.EQ * 




&337- 


C5 


21 


1518 CMP HIOTH CGUERED LINE 


60ft 1- 2630 Z.LEN 


.EQ Z. END-START j0UOK> 
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TAPDUP — AIM Tape 
Copy Utility 



by Joel Swank 











; TflPDUF' i RIM TRPE 


DUPLICATOR 


This article will provide you with 












an easy way to back up your 








; ZERO PRGE 




AIM cassettes by controlling two 
recorders at the same time. 








FILGflP =$0 
BLKCNT =$1 

; AIM RAM 


; QUARTER SECONDS BETWEEN FILES 
; COUNT OF BLOCKS TO COPY 


TAPDUP 


requires: 








BLK =$115 


; BLOCK COUNT 


AIM 65 








TflBUFF =$116 


;TRPE BUFFER 








GAP =$R409 


;TRPE INTER-BLOCK GAP 


and two tape recorders 








flDDR =$R41C 
TRPIH =$R434 
TRPOUT =$R435 


; ADDRESS INPUT RRER 
; INPUT DRIVE 
; OUTPUT DRIVE 


The AIM 65 provides the user with a 








TRPTR2 =$R437 


;TRPE BUFF PTR 


flexible and reliable tape storage 








; RIM SUBROUTINES 




system. AIM records data on tape in 












80-byte blocks. A program sends data 








ADD IN =$EAAE 


; INPUT ADDRESS 


to the AIM firmware a character at a 








TIBY1 =$ED53 


; INPUT BLOCK TO TAPE 


time, and then the firmware stores it in 








REDOUT =$E973 
CRLOU =$EA13 


;GET CHAR FROM KBD 
;CP-"LF TO DISPLAY 


a buffer on page zero or one. When the 








OUTPUT =$E97R 


;ACCUM TO DISPLAY 


buffer is full it is automatically written 








CKER0 =$E38E 


; ERROR MESSAGE 


to the tape. If the remote control 








BKCKSN =$F1E7 


; COMPUTE CHECKSUM 


feature is connected, the tape recorder 








TROSET =$F21D 


.-.START OUTPUT DRIVE 


is started and stopped as necessary. 








OUTTRP =$F24A 
CKBUFF =$F1D2 


;SEND CHAR TO TRPE 
:L0AD FROM ACTIUE BUFFER 


AIM can control two recorders at 








; AIM 6532 TIMER 




once; one for input and one for output. 












This makes it easy to read data from 








RINT =$A485 


;TIME OUT FLAG 


one recorder and write data to another 








DI1024 =$A497 


;1024 MS TIMER 


at the same time. It also makes it sim- 








; TRPE I/O PORT 




ple to write a program to copy tapes a 












character at a time. But there is no con- 








DRB =$R800 


;DRTA REG 


sistent way to detect the end of the in- 








RCR "5R308 


;AUX CONTROL REG 


put file (EOF] . The AIM routines detect 








EQUATES 




EOF from the data itself. The editor 












uses a null line; BASIC uses a control-Z 








BELL =7 


; ASCII BELL CHAR 


($1A); and the binary memory dump/ 








*=$200 




load routines use a zero length record. 










The user may also store his own data 


0200 


D8 




TAPDUP OLD 




on tape and use yet another method to 


0201 


A9 


20 


LDR #$20 


;SET TAPE GAP 


signal EOF. I wanted a program that 


0203 


3D 


09 R4 


STR GRP 




would copy any AIM tape regardless of 


0206 


20 


13 Eft 


REDRU JSR CRLOW 


;NEU LINE 


the type of data recorded on it. The 
result is TAPDUP. 


0209 
02 0B 


R2 

20 


15 

FC 02 


LDX #DRUMSG-LI is 

JSR KEPX ; REQUEST INPUT DRIVE 


02 0E 


20 


73 E9 


GETANS JSR REDOUT 


;GET REPLY 




0211 


C9 


31 


CMP ri y 


; ALLOW ONLY 1 OR 2 


I tried to make TAPDUP as flexible 


0213 


F0 


OR 


BEQ TflPOK 




as possible. There are two major 
reasons for copying a tape: backup of 


0215 
0217 
0219 


C9 
F0 
20 


32 
06 
SE E3 


CMP #'2 
BEG TflPOK 
JSR CKERO 


;ELSE SEND ERROR MSG 


important data, and duplication of 


021 C 


4C 


06 02 


JMP REDRU 


;AND TRY AGAIN 


tapes for distribution. The former 


021F 


29 


03 


TRPQK AND fc3 


; CLEAR HI BITS 


might require the ability to copy long 


0221 


RA 




TAX 




multi-file tapes. In this case I wanted to 


0222 


Cfl 




DEX 


; CONVERT TO INTERNAL FORMAT 


detect automatically the end of the file 
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0223 


SE 34 R4 




STX 


TAP IN 


;SRUE INPUT DRIUE* 


0226 


F0 03 




BEG 


INKX 


; OUTPUT DRIUE* IS 


0223 


CR 




DEX 




;THE OTHER ONE 


0229 


FO 01 




BEQ 


STOUT 




022B 


E8 


INKX 


I NX 






022C 


3E 35 R4 


STOUT 


STX 


TRPOIJT 




022F 


20 13 ER 




JSR 


CRLOW 


;NE« LINE 


0232 


R2 23 


REGRP 


LDX 


#GRPMSG- 


-L ITS; REQUEST FILE GAP 


0234 


20 FC 02 




JSR 


KEPX 




0237 


20 73 E9 




JSR 


REDOUT 


;GET REPLY 


023fl 


C9 30 




CMP 


#--0' 


; ALLOW 0-9 


023C 


90 04 




BCC 


BRDGRP 




023E 


C9 3R 




CMP 


#*3A 




0240 


90 06 




BCC 


GRPOK 




0242 


20 8E E3 


BRDGRF 


JSR 


CKERO 


;ERR MSG 


0245 


4C 32 02 




JMP 


REGRP 


;TRY AGAIN 


0248 


29 OF 


GRFOK 


RND 


#*F 


.CLEAR HI BITS 


024fl 


OR 




RSL 


R 


; MULTIPLY BY 4 


0246 


OR 




RSL 


R 




024C 


35 00 




STR 


FILGRP 


; SRUE 


024E 


20 13 ER 




JSR 


CRLOW 


;NEW LINE 


0251 


R2 40 


REBLK 


LDX 


«BLKMS6- 


-L ITS; REQUEST BLOCK COUNT 


0253 


20 FC 02 




JSR 


KEPX 




0256 


20 RE ER 




JSR 


RDDIN 


;GET REPLY 


0259 


BO F6 




BCS 


REBLK 


; ERROR - RETRY 


025B 


RD 1C R4 




LOR 


RDDR 


:SRUE IT 


025E 


85 01 




STR 


BLKCNT 




0260 


20 13 ER 




JSR 


CRLOW 




0263 




j HOW RERD AND WRITE BLOCKS FQREUER 


0263 


R9 00 


BLKLUP 


LDR 


#0 


; CLEAR BLOCK COUNT i 


0265 


8D 15 01 




STR 


BLK 




0268 


20 53 ED 




JSR 


TIBY1 


;RERD R BLOCK 


026B 


RD 16 01 




LDR 


TRBUFF 


;GET BLOCK COUNT 


026E 


DO 03 




BNE 


MOBLKO 


;SKIP IF NON-ZERO 


0270 


20 C2 02 




JSR 


RDYOUT 


; READY OUTPUT DRIUE 


0273 


20 98 02 


NGBLKO 


JSR 


WRTBLK 


; WRITE IT 


0276 


R5 01 




LDR 


BLKCNT 


; COUNTING BLOCKS? 


0278 


FO E9 




BEQ 


BLKLUP 


:NO 


027R 


CD 16 01 




CMP 


TRBUFF 


;IS THIS THE LRST? 


027D 


DO E4 




BNE 


BLKLUP 


;NQ, CONTINUE , 


027F 


20 13 ER 




JSR 


CRLOW 


;NEW LINE 


0282 


R2 33 




LDX 


rTAPMSG- 


L ITS; NOTIFY USER 


0284 


20 FC 02 




JSR 


KEPX 




0287 


RD 00 R3 




LDR 


DRB 


;TURN ON TRPES 


028fl 


09 30 




ORfi 


#$30 




028C 


3D 00 R8 




STR 


DRB 




028F 


20 73 E9 




JSR 


REDOUT 


;WAIT FOR SIGNAL 


0292 


20 13 ER 




JSR 


CRLOW 


;THEN RESUME COPY 


0295 


4C 63 02 




JMP 


BLKLUP 


;DO IT AGAIN 


0298 




WRTBLK 


: WRITE 


BLOCK TO TRPE 


0298 


20 E7 Fl 


WRTBLK 


JSR 


BKCKSM 


; COMPUTE CHECKSUM 


029B 


20 ID F2 




JSR 


TROSET 


;STRRT DRIUE 


029E 


R9 23 




LDR 


#'#' 


;CHflR FOR BEGINNING OF BLOCK 


02R0 


20 4R F2 




JSR 


OUTTRP 




02R3 


20 D2 Fl 


TRBY2 


JSR 


CKBUFF 


;GET R CHRP FROM BUFFER 


02R6 


20 4R F2 




JSR 


OUTTRP 


;SEND IT 


02R9 


E8 




I NX 






02AFI 


EO 53 




CPX 


#83 


;2 BLK CKSUM CHRRS +1 CHRR 


02RC 


DO F5 




BNE 


TRBY2 




02AE 


RD 00 R8 




LDR 


DRB 




02B1 


29 CF 




AND 


#$CF 


;TURN OFF TAPES 


02B3 


SD 00 R8 




STR 


DRB 




02B6 


58 




CLI 




; ENABLE INTERRUPT 1 


02B7 


R9 00 




LDR 


#0 




02B9 


8D 37 R4 




STR 


TRPTR2 


;CLERR TRPE BUFF PTR 


02BC 


R9 00 




LDR 


#0 


; RESET FREE RUNNING TO ONE SHOT 


02BE 


8D OB A3 




STR 


RCR 




02C1 


60 




RTS 






02C2 




; RDYOUT 


: TURN ON OUTPUT DRIUE AND WRIT 


02C2 








FOR CHARACTER FROM KEYBOARD ! 


02C2 








OR WAIT FOR DESIRED SECONDS ! 



02C2 20 ER 02 RDYOUT JSR TOGOUT 

02C5 R6 00 LDX FILGAP 

02C7 DO 11 BNE RETIME 

02C9 20 13 ER JSR CRLOW 



;ON DRIUE 
;RNY FILE GAP? 
;YES, GO TO DELAY LOOP 
;NEW LINE 



and insert a gap between files. The lat- 
ter might require detecting the end of a 
tape and allowing the rewinding of the 
input tape and the inserting of a new 
output tape. TAPDUP attempts to fill 
both of these needs. The biggest 
challenge was to find a consistent way 
to detect EOF. The key to this turns out 
to be the AIM tape block count. 

Each block in an AIM tape file con- 
tains a one-byte binary block number. 
The blocks within a file are numbered 
sequentially starting with zero. This 
block number is shown in the AIM 
display during reading or writing of a 
tape file. As long as a file has fewer than 
256 blocks, each block in a file has a 
unique block number. If a file exceeds 
256 blocks, the block number wraps to 
zero on the 257th block. TAPDUP uses 
the block number in a couple of dif- 
ferent ways to detect EOF. 

TAPDUP has three modes of opera- 
tion. In the first mode, it automatically 
inserts a user-specified gap before 
writing any block number zero. This 
allows automatic spacing between files 
or automatic skip over the tape leader. 
The second mode is manual spacing 
mode. Here, TAPDUP stops before 
writing any block number zero, turns 
on the output recorder so the user can 
manually insert the desired spacing, 
and waits for a character from the 



THE TRIANGULATOR 

Solve triangles on your Apple* 
and get rid of your calculator 
and pencil!! 

This program will solve any right or oblique 
triangle. Results can be printed or used on 
further calculations. Previous results are 
recalled with a simple letter/number pair and 
can be added or subtracted from each other or 
from new data. For example, the height of the 
triangle below is catctulated as follows: 

A? A? 

B? B?B1 

C? D7D1 ^ 

D?2"13/16 E 1.5546 &' 

E7H5/16 F? 

F?3.5 

F=3.if 

Entry can be fraction, decimal, or QMS. 
Results are rounded to 4 places. Requires 48k 
Apple Ik DOS 3.2 or 3.3, parallel printer. 

Send $39.95 + $1 .50 postage and handling to: 

Arrow Data Systems 
1224 E. Harmont 
Phoenix, AZ 85020 

*Apple is a registered trademark of Apple| 
Computer, Inc. 
Dealer inquires invited. (602) 997-66381 
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keyboard before continuing. The third 
mode is block count mode. In this 
mode the user specifies the number of 
the last block to be copied. After 
writing the specified block, TAPDUP 
stops and turns on both recorders, and 
waits for a character from the keyboard. 

Operation 

First turn off both recorders with 
the AIM 1 and 2 commands. Then 
ready both recorders by pressing play or 
record as desired. Execute TAPDUP at 
$200; TAPDUP prompts for all neces- 
sary information. The first prompt is 
'INPUT DRJVE# = '. Enter the number 
of the input drive, 1 or 2 — the output 
drive is assumed to be the other one. 
The next prompt is 'INTER-FILE 
GAP = ' . Enter the number of seconds 
to be inserted in front of each block 
zero. A single digit from through 9 is 
allowed. If is entered, manual spacing 
mode is assumed. If more than 9 
seconds of spacing is needed TAPDUP 
could be modified to allow a larger 
number. Finally the prompt '# OF 
LAST BLOCK = ' is issued. Enter a one- 
or two-digit hex number of the last 
block to be copied followed by a return. 
Zero indicates that block count mode is 



AT LAST... 
...H3R 



□SI 



For investors 

and financial managers 

Stock portfolio analysis 

$150.00 

•in your office - instant valuations 

•compound growth measurement 

•pertinent company operating statistics 

Stock financial 

statement analysis 

$250.00 

•input your interpretation 

of financial data 

•analyze up to 10 years of data 

•see mean, trend and stability 

On-line data retrieval 

$50.00 

Accounting package 

$150.00 

DBM system 

$200.00 

for 8" floppy/hard disc 

under OS65U 

4^|\ Full Screen Editor 

%8&* for Polled Keyboard 

$75.00 

•for OS65D & OS65U 

• machine language based 

•type or cursor mode 

write for details 

Genesis Information 
Systems, Inc. 

P.O. Box 3001 • Duluth, MN • 55803 
Phone 218/724-3944 



02CC 


R2 00 


LOX #RDYMSG-LITS; REQUEST DRIUE READY 


02CE 


20 FC 02 


JSR KEPX 


02DI 


20 73 E9 


JSR REDOUT ;GET REPLY 


02D4 


20 13 Eft 


JSR CRLOW ;NEW LINE 


Q2D7 


4C Efl 02 


JMP TOGOUT ;G0 TURN ON DRIUE 


i 02DR 


R9 F4 


RETIME LDR #*F4 ;RB0UT fl QUARTER SECOND 


02DC 


8D 97 R4 


STR DI1024 ;INT0 TIMER 


02DF 


80 9? R4 


STR DI1024 ; AGAIN IN CASE IT'S NOT LISTENING 


02E2 


2C 85 R4 


WTIME BIT RINT ;TIME UP? 


02E5 


10 F8 


BPL WTIME ;N0PE, WAIT 


02E? 


CR 


DEX ; COUNT 


02E8 


DO F0 


BNE RETIME ; UNTIL ZERO 


02ER 




; TOGOUT : TOGGLE OUTPUT DRIUE LINE 


02ER 


RO 35 R4 


TOGOUT LDA TRPOUT ;GET OUTPUT DRIUE 


02ED 


F0 04 


BEQ T0G1 ; BRANCH IF DRIUE #1 


02EF 


R9 20 


LDR #*20 ; DRIUE 2 


02F1 


DO 02 


BNE TOGIT 


02F3 


R9 10 


T0G1 LDR #*10 ; DRIUE 1 


02F5 


4D 00 R8 


TOGIT EOR DRB 


02F8 


8D 00 R8 


STR DRB ; TOGGLE 


02FB 


60 


RTS 


02FC 




; KEPX :MESSRGE WRITER 


02FC 


BD 08 03 


KEPX LDR LITS.X ;GET R CHARACTER 


02FF 


F0 06 


BEQ KEPDUN ;QUIT ON NULL 


0301 


20 7fl E9 


JSR OUTPUT ;SEND IT 


0304 


E8 


INX 


0305 


DO F5 


BNE KEPX 


0307 


60 


KEPDUN RTS 


0308 




.OPT GEN 


0308 




LITS =* 


0308 


4F 55 


RDYMSG .BYTE 'OUTPUT DRIUE READY?' , BELL, 


03 OR 


54 50 




030C 


55 54 




03 0E 


20 44 




0310 


52 49 




0312 


56 45 




0314 


20 52 




0316 


45 41 




0318 


44 59 3F 




031 B 


07 




031C 


00 




031D 


49 4E 


DRUMSG .BYTE 'INPUT DRIUE**', Q 


031F 


50 55 




0321 


54 20 




0323 


44 52 




0325 


49 56 




0327 


45 23 3D 




032F( 


00 




032B 


49 4E 


GRPMSG .BYTE 'INTER-FILE GAP=',0 


032D 


54 45 




032F 


52 2D 




0331 


46 49 




0333 


4C 45 




0335 


20 47 




033? 


41 50 3D 




033fl 


00 




033B 


52 45 


TAPMSG .BYTE 'READY TAPES' , BELL, 


033D 


41 44 




033F 


59 20 




0341 


54 41 




0343 


50 45 53 




0346 


07 




034? 


00 




0348 


23 20 


BLKMSG ,BYTE '# OF LAST BLOCK' > 


034R 


4F 46 




034C 


20 4C 




034E 


41 53 




0350 


54 20 




0352 


42 4C 




0354 


4F 43 4B 




0357 


00 




0358 




.END 



100 
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keyboard before continuing. The third 
mode is block count mode. In this 
mode the user specifies the number of 
the last block to be copied. After 
writing the specified block, TAPDUP 
stops and turns on both recorders, and 
waits for a character from the keyboard. 

Operation 

First turn off both recorders with 
the AIM 1 and 2 commands. Then 
ready both recorders by pressing play or 
record as desired. Execute TAPDUP at 
$200; TAPDUP prompts for all neces- 
sary information. The first prompt is 
'INPUT DRJVE# = '. Enter the number 
of the input drive, 1 or 2 — the output 
drive is assumed to be the other one. 
The next prompt is 'INTER-FILE 
GAP = ' . Enter the number of seconds 
to be inserted in front of each block 
zero. A single digit from through 9 is 
allowed. If is entered, manual spacing 
mode is assumed. If more than 9 
seconds of spacing is needed TAPDUP 
could be modified to allow a larger 
number. Finally the prompt '# OF 
LAST BLOCK = ' is issued. Enter a one- 
or two-digit hex number of the last 
block to be copied followed by a return. 
Zero indicates that block count mode is 



AT LAST... 
...H3R 



□SI 



For investors 

and financial managers 

Stock portfolio analysis 

$150.00 

•in your office - instant valuations 

•compound growth measurement 

•pertinent company operating statistics 

Stock financial 

statement analysis 

$250.00 

•input your interpretation 

of financial data 

•analyze up to 10 years of data 

•see mean, trend and stability 

On-line data retrieval 

$50.00 

Accounting package 

$150.00 

DBM system 

$200.00 

for 8" floppy/hard disc 

under OS65U 

4^|\ Full Screen Editor 

%8&* for Polled Keyboard 

$75.00 

•for OS65D & OS65U 

• machine language based 

•type or cursor mode 

write for details 

Genesis Information 
Systems, Inc. 

P.O. Box 3001 • Duluth, MN • 55803 
Phone 218/724-3944 



02CC 


R2 00 


LOX #RDYMSG-LITS; REQUEST DRIUE READY 


02CE 


20 FC 02 


JSR KEPX 


02DI 


20 73 E9 


JSR REDOUT ;GET REPLY 


02D4 


20 13 Eft 


JSR CRLOW ;NEW LINE 


Q2D7 


4C Efl 02 


JMP TOGOUT ;G0 TURN ON DRIUE 


i 02DR 


R9 F4 


RETIME LDR #*F4 ;RB0UT fl QUARTER SECOND 


02DC 


8D 97 R4 


STR DI1024 ;INT0 TIMER 


02DF 


80 9? R4 


STR DI1024 ; AGAIN IN CASE IT'S NOT LISTENING 


02E2 


2C 85 R4 


WTIME BIT RINT ;TIME UP? 


02E5 


10 F8 


BPL WTIME ;N0PE, WAIT 


02E? 


CR 


DEX ; COUNT 


02E8 


DO F0 


BNE RETIME ; UNTIL ZERO 


02ER 




; TOGOUT : TOGGLE OUTPUT DRIUE LINE 


02ER 


RO 35 R4 


TOGOUT LDA TRPOUT ;GET OUTPUT DRIUE 


02ED 


F0 04 


BEQ T0G1 ; BRANCH IF DRIUE #1 


02EF 


R9 20 


LDR #*20 ; DRIUE 2 


02F1 


DO 02 


BNE TOGIT 


02F3 


R9 10 


T0G1 LDR #*10 ; DRIUE 1 


02F5 


4D 00 R8 


TOGIT EOR DRB 


02F8 


8D 00 R8 


STR DRB ; TOGGLE 


02FB 


60 


RTS 


02FC 




; KEPX :MESSRGE WRITER 


02FC 


BD 08 03 


KEPX LDR LITS.X ;GET R CHARACTER 


02FF 


F0 06 


BEQ KEPDUN ;QUIT ON NULL 


0301 


20 7fl E9 


JSR OUTPUT ;SEND IT 


0304 


E8 


INX 


0305 


DO F5 


BNE KEPX 


0307 


60 


KEPDUN RTS 


0308 




.OPT GEN 


0308 




LITS =* 


0308 


4F 55 


RDYMSG .BYTE 'OUTPUT DRIUE READY?' , BELL, 


03 OR 


54 50 




030C 


55 54 




03 0E 


20 44 




0310 


52 49 




0312 


56 45 




0314 


20 52 




0316 


45 41 




0318 


44 59 3F 




031 B 


07 




031C 


00 




031D 


49 4E 


DRUMSG .BYTE 'INPUT DRIUE**', Q 


031F 


50 55 




0321 


54 20 




0323 


44 52 




0325 


49 56 




0327 


45 23 3D 




032F( 


00 




032B 


49 4E 


GRPMSG .BYTE 'INTER-FILE GAP=',0 


032D 


54 45 




032F 


52 2D 




0331 


46 49 




0333 


4C 45 




0335 


20 47 




033? 


41 50 3D 




033fl 


00 




033B 


52 45 


TAPMSG .BYTE 'READY TAPES' , BELL, 


033D 


41 44 




033F 


59 20 




0341 


54 41 




0343 


50 45 53 




0346 


07 




034? 


00 




0348 


23 20 


BLKMSG ,BYTE '# OF LAST BLOCK' > 


034R 


4F 46 




034C 


20 4C 




034E 


41 53 




0350 


54 20 




0352 


42 4C 




0354 


4F 43 4B 




0357 


00 




0358 




.END 



100 
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not to be used. The number of the last 
block in a file may be determined by 
examining memory location $116 after 
reading or writing the file. After writing 
a file, $116 contains the block number 
of the last block plus 1 . After reading a 
file, $116 contains the actual number 
of the last block. Block count mode 
may be used with either automatic or 
manual spacing mode. 

Next, the input recorder will run as 
TAPDUP searches for the first data 
block on the tape. When the first block 
has been read in, TAPDUP will either 
automatically space the output tape if a 
non-zero gap was specified, or display 
the message 'OUTPUT DRIVE READY?' 
and wait for a character from the 
keyboard if manual mode was re- 
quested. In the later case you should 
position the output recorder as desired 
and enter any character except escape. 
Then the input and output recorders 
will alternately run as each block of 
data is copied. The block numbers are 
shown in the AIM display as usual. If 
block count mode is used, TAPDUP 
will stop after writing the specified 
block, display the message 'READY 



TAPES', and wait for input from the 
keyboard. Both recorders are turned on 
so you can position them as desired and 
resume operation by typing any charac- 
ter except escape. TAPDUP never ter- 
minates and must be stopped with the 
reset button or by entering escape in 
response to one of the ready messages. 

I use TAPDUP most often to make 
multiple copies of a tape for distribu- 
tion. To do this I use automatic spacing 
mode with block count mode. I first 
put the master tape in the input 
recorder and a blank tape in the output 
recorder and start TAPDUP. When the 
file has been copied, the 'READY 
TAPES' message appears. I then rewind 
both tapes, put away the master tape, 
move the newly recorded tape to the in- 
put drive, and put a new blank tape into 
the output drive. I then start both 
drives and enter a character to notify 
TAPDUP to continue. By using the 
previously recorded tape as input, I 
verify each tape at no extra cost in 
time. I inserted an ASCII bell character 
in both of the ready messages to cause 
my terminal to beep when TAPDUP 
needs attention. This allows me to 



busy myself with other tasks while 
copying tapes. Unfortunately the bell 
character has no effect if you are using 
only the AIM display. TAPDUP sets 
the AIM inter-block gap value at $A409 
to $20 so that I do not have to 
remember to do it. This larger-than- 
normal gap is required to allow time for 
starting and stopping the tape between 
blocks when using AIM's remote con- 
trol feature. 



Errors 

If an invalid response is entered to 
any of the prompts, the standard AIM 
'ERROR' message is displayed and the 
prompt re-issued. If an error is en- 
countered while reading the tape, the 
'ERROR' message is displayed and con- 
trol returns to the AIM monitor. 



Joel Swank may be contacted at 25730 
Beach Dr., Rockaway, OR 97136. 

JMCftO 






Perry PemphERAls Repajrs KIMs!! 

(SYMs ANd AIMs Too) 

• We will Diagnose, Repair, and Completely Test your Single Board Computer 

• We Socket all replaced Integrated Circuits 

• You receive a 30-day Parts and Labor Warranty 

• Your repaired S.B.C. returned via U.P.S. — C.O.D., Cash 

Don't delay! Send us your S.B.C. for repair today 
Ship To: (Preferably via U.P.S.) 

Penay PeripIieraIs 

6 Brookhaven Drive 
Rocky Point, NY 11778 
KIM-1 RepUcement ModuUs 

• Exact replacement for MOS/Commodore KIM-1 S.B.C. 

• Original KIM-1 firmware — 1K and 4K RAM versions 

Replacement KIM-1 KeyboARds 

• Identical to those on early KIMS — SST switch in top right corner 

• Easily installed in later model KIMs 

Perry Peripherals is an authorized HDE factory service center. 

Perry Peripherals carries a fuil line of the acclaimed HDE expansion components for you KIM SYM and AIM 
including RAM boards, Disk Systems, and Software like HDE Disk BASIC V1. 1. Yes, we also have diskettes For 
more information write to: P.O Box 924, Miller Place, NY 11764, or Phone (516) 744-6462 
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h ^ of the ^« 




The Adventure is Waiting for You.,— ♦.. 



How would you like to go back in time to 19th century 
London to match wits with Jack the Ripper? Out into 
space to brave the swirling vortex of a black hole? Into 
the depths of the ocean, or on a quest to rescue a 
beautiful princess from the clutches of evil monsters? 

You never know where SoftSide Magazine's Adven- 
ture of the Month might take you. But you can be sure 
that each month you will experience new delights and 
new challenges as you receive an original adventure on 
tape or disk, ready to load into your computer. 

The cost? A six-month membership is only $29 for the 
adventures on tape ($4.83 each) or $49 on disk ($8.16 
each). If you're not sure you can handle six full months 
of excitement, you can order a single adventure on tape 
for $7 or on disk for $10. You can choose from: 



Arabian Adventure 
Alien Adventure 
Treasure Island Adventure 
Jack the Ripper Adventure 
Crime Adventure 



Black Hole Adventure 
Windsloe Mansion Adventure 
Klondike Adventure 
James Brand Adventure 
Witches' Brew Adventure 



Around the World in 80 Days 

To order, use coupon provided or write to: 

Adventure of the Month 

6 South Street 

Milford, NH 03055 



ADVENTURE OF THE MONTH 

Six month subscription: 

□ Cassette — $29 

□ Disk — $49 

Individual adventures (please specify) 



□ Cassette — $7 each 

□ Disk — $10 each 

■ Three adventures on one super disk ($26 each): 

□ Arabian, Alien, and Treasure Island Adventures 

□ Jack the Ripper, Crime, and Around the World Adventures 

□ Black Hole, Windsloe Mansion, and Klondike Adventures 
Please specify which computer: 

G Apple™ (req. 24K for tape, 32K for disk) 

□ ATARI® (req. 32K for tape, 40K for disk) 

□ TRS-80® (req. 16K for tape, 32K for disk) 

Name 

Address 



City/State . 



_Zip_ 



□ MasterCard □ VISA D Payment enclosed 
Name of Cardholder 



MC# and lnterbank#/VISA# 

Exp. Date Signature 

Prices subject to change without notice, AppleTM, ATARI® and TRS-80® are registered 
trademarks of The Apple Computer Company, Warner Communications and The Tandy 
Corporation respectively. 
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Hardware Catalog 






Name: foyport 

System: Apple 
Language: Compatible with 
BASIC, Pascal, 
and Machine 
Language 
Description: Apple Computer 
input device that allows you to 
use four Apple game paddles or 
two Atari joysticks. Easily ac- 
cessible connectors eliminate 
need to open Apple case. Two 
switches to select between 
Apple-type paddles and Atari 
joysticks. 
Price: $74.95 
Includes one copy of Sirius 
Software's Computer Foosball 
and complete instructions 
Available: 
Sirius Software, Inc. 
10364 Rockingham Dr. 
Sacramento, CA 95827 



Name: Modem Driver 

Module Kit — 
MDM-2 

System: VIC-20 
Memory: 5K 
Language: BASIC 
Hardware: RS-232-C Modem 
Description: Kit for driving in- 
expensive modems, or most 
serial printers. Includes 
V-Term-20 terminal program 
that converts VIC-20 to a ter- 
minal with escape key, break 
key and control characters. 
Price: $29.00 kit 

$35.00 assembled and tested. 

Includes V-Term-20 terminal 

program. 
Available: 

RVR Systems 

P.O. Box 265 

Dewitt, NY 13214 

Name: SADI 

System: PET/CBM 

Computers 
Language: BASIC 
Hardware: Bi-directional 

Printer Adapter 
Description: The CmC SADI 
communications controller is 
a microprocessor-based 
peripheral device for the Com- 
modore PET and CBM com- 
puters allowing you to connect 
your computer to parallel and 
serial printers, CRTs, mo- 
dems, accoustic couplers, hard 
copy terminals and other com- 
puters. Some other features are 
the RS-232 serial in and out, 



parallel printer output, Cen- 
tronics-compatible, true ASCII 
conversion, 32-character buf- 
fer with X-off/x-on feature, 75 
to 9600 baud and allows trans- 
fer of programs between PETs. 
Price: $295.00 

Includes case, PET IEEE 

cable and power supply. 
Available: 

Connecticut microcomputer 

36 Del Mar Dr. 

Brookfield, CT 06804 

(203) 775-4595 



Name: Station Master 

System: 48K Apple II or 

Apple II Plus 
Memory: 16K 
Language: Compatible with 
BASIC, Pascal 1.1, 
and CP/M 
Hardware: One of the parallel 
printers listed 
below 
Description: Universal parallel 
interface card with graphics on 
board. Allows user to dump hi- 
res screen by easy keyboard 
commands. Features include: 
dumping page 1 or 2, normal or 
expanded size, picture or plot 
and horizontal positioning. 
Printer required: Epson MX-80 
with graphics, Epson MX- 100, 
Anadex 9501/9500, Data 
South DS180, Centronics 739 
or NEC PC8023. 
Price: $175.00 
Includes card, cable and 
practice pictures on diskette. 
Available: 
Computer Station 
11610 Page Service Dr. 
St. Louis, MO 63141 
or your local dealer 



Name: 8510 pro/writer 

printer 

Description: 120 CPS, tractor 
and friction feed, graphics and 
incremental printing. Propor- 
tional spacing (N x 9], pica and 
elite compressed (9x7), 
character generator (8x8). 
Uni- and bi-directional com- 
pressible to 136 columns. In- 
terface: parallel 8-bit Cen- 
tronics or serial RS-232C with 
switch selections for x-on/ 
x-off protocol. 
Includes languages: U.S., 
U.K., Japanese, Swedish, 
German — in ROM. 



Available: 
Leading Edge Products, Inc. 
225 Turnpike St. 
Canton, MA 02021 



Name: Digibit 

Hardware: Digitizer, cursor, 
RS-232C interface 
power supply 
cable for operation 
at 300 baud 
Description: The Digibit is a 
light-weight, self-contained 
digitizer for graphics analysis. 
It is compact with a working 
area of H"xl7" and a 0.01 
resolution. It digitizes in either 
point to point or stream mode 
on any surface or angle in- 
cluding a CRT screen. It fits 
any system, converting 
graphic images into numeral 
values for the computer. 
Price: $520.00 complete 
Available: 
NUMONICS 
418 Pierce St. 
Lansdale, PA 19446 
(215) 362-2766 



Name: GIMIX Multiuser 

System: 6809 Winchester 

System 
Memory: 120KB 
Language: BASIC09, Pascal, 

CIS, COBOL, C 
Description: GIMIX's 6809 
system supports up to four ter- 
minals and features a 2MHz 
6809 CPU, 120KB of static 
RAM, a 19MB (unformatted) 
SVa" Winchester hard disk, a 
1MB (unformatted) 5H" flop- 
py disk, and four serial I/O 
ports. Memory is expandable 
up to 632KB. Additional mem- 
ory, mass storage capacity, and 
I/O for additional terminals 
and peripherals are optional. 
The system can select between 
two operating systems, under 
software control, making it 
useful for software develop- 
ment. The price includes OS-9 
level 2, a UNIX-like multi- 
user, multi-tasking operating 
system and the OS-9 debugger, 
text editor, and assembler, the 
GMXBUG/FLEX monitor/ 
operating system combina- 
tion, and a single-user (56KB) 
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operating system, capable of 
running any software written 
for FLEX. 
Price: $8998.09 
Available: 

GIMIX, Inc. 

1337 West 37th Place 

Chicago, IL 60609 



Name: Parallel Printer 

Interface 

System: OSI, or any 

system with a 
6850 ACIA 
Hardware: Single printed 

circuit board 
Description: This small PCB 
converts any OSI serial port to 
a Centronics parallel printer 
port. Absolutely no software 
changes, no tracks to cut. Just 
unplug your 6850 ACIA and 
plug in the PCB. 
Price: $9.95 PCB 

$45.95 assembled and tested 

(US including P&P) 

Includes PCB, either bare or 

assembled and tested, full 

instructions, one-year 

warranty (assembled and 

tested only). 
Available: 

G. Cohen 

72 Spofforth St. 

Holt, Act, 2615 

Australia 



Name: ADA 1450 

System: PET/CBM 
Computers 
Language: BASIC 
Hardware: Printer Adapter 
Description: A serial interface 
that allows PET/CBM com- 
puters to use standard serial 
printers. The ADA 1450 is ad- 
dressable and set to work with 
ASCII-coded printers. It has a 
two-foot cable which plugs in- 
to the PET IEEE port. Another 
IEEE card edge connector is 
provided to connect other 
peripherals. The address is 
switch selectable for upper and 
lower case. 
Price: $149.00 
Available: 

Connecticut microcomputer 

36 Del Mar Dr. 

Brookfield, CT 06804 

(203) 775-4595 
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Answers to June Crossword Puzzle 
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PROUDLY PRESENTS: AFFORDABLE 

ATARI® 

SOFTWARE 

RNDRDtD HTTHCK 



FIGHT YOUR WAY THROUGH LEVELS OP 
DEADLY ANDROID GUARDS TO SAVE THE 
RUNAWAY NUCLEAR REACTOR, THEN TRY 
TO SAVE YOURSELF t 



aaarr r ggg-' 



A FAST, FRANTIC CHASE AROUND THE 
SCREEN TRYING TO CATCH SOME CRAZY 
CREATURES. IF YOU CATCH THE 
♦SUPER-AAARRRGGG 1 * , YOU'LL GET A 
SUPEfl BONUS, BUT DON'T GET POISONED I 



5TRRBR5E A55RULT 

HOW LONG CAN YOU PROTECT YOUR 
STARBASE FROM THE ATTACKING ALIEN 
ARMADA? EACH HIT WEAKENS YOUR FORCE 
FIELD RINGS AND NOW THEY'RE ATTACKING 
FIVE AT A TIME I 



FOR 16K CASSETTE OR 2kK DISK 

*FAST* ACTION, SUPER GRAPHICS, ONLY J 18. 95 EACH 

PLEASE ADD $2.00 PER ORDER FOR SHIPPING. 





INTRODUCTORY OFFER: 
MENTION THIS AD AND TAKE 
#1.00 OFF EACH GAMEt 



© 



Pretzel land Software 

2005 WHITTAKER 
YPSILANTI, MI.48197 



hde software? 

YOU BET! 

PUT YOUR AIM • SYM • KIM 
OR OMNI 65 TO WORK WITH 



• DATA FOREMAN $89.95 

General purpose data entry and 
retrieval system. Provides 
record keeping, sorting, 
searching, and user defined 
report writing. 

SOME COMMENTS FROM USERS - 

"Every time I use Data Foreman 
l find more applications for it." 

"Since purchasing both Data 
Foreman and your inventory 
System, we've finally brought 
our inventory problem under 
control." 

"Your customer support is 
terrific, keep up the good 
work." 

* ALSO AVAILABLE - 

INVENTORY MANAGEMENT 
950.00 

CHECKING ACCOUNT 

MANAGEMENT 

$129.95 

AVAILABLE FROM: 



'EVSTQNE 



DATA CONSULTANTS, INC. 

CUSTOMER SERVICE 

P.O. BOX 606 
YORK, PA 17405 

717-848-5666 



MEMBER - 

YORK AREA CHAMBER OF COMMERCE 

NATIONAL FEDERATION INDEPENDENT BUSINESSES 
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Short Subjects 



Interactive Random Generator by Harry white 

Left of Equal Sign MID$ in Applesoft 

by Gustavo Criscuolo 



Interactive Random 
Generator 

Harry White, 7495 West 81st Avenue, 
Arvada, Colorado 80003 



If ; however, your upper range limit is 
consistent during a run of the program, 
line 190 can be changed to read: IF A$ 
= CHR$(32) THEN GOTO 140. Then, 
pressing the space bar will give you a 
different number within your limits 
each time. 



The important line in the routine is 
number 140, which PEEKs 78 and 79 and 
retrieves the integer there. The input 
variable, A, is used in the formula to fit 
the random number within the limit set 
by A. The result is pseudo random but 
less predictable than Applesoft RND. 






The Applesoft RND function produces 
a series of tables of "random" num- 
bers. The particular table depends on 
what negative number is used in RND 
to initialize the series. If you are using a 
turnkey system or running from a cold 
start, you get the same series of random 
numbers every time. Random, perhaps, 
but predictable. 

Listing 1 solves the problem. It 
takes advantage of the fact that decimal 
memory locations 78 and 79 (hex $4E 
and $4F) contain a 16-bit number that 
is constantly being incremented at 
microprocessor speed as long as the 
machine is awaiting input. You cannot 
predict (in real time) what number is in 
that two-byte location while the flash- 
ing cursor is on the screen. 

In listing 1, the input statement is 
needed not only to determine the 
desired parameters of the random 
range, but to interrupt the incre- 
menting at locations 78 and 79. This 
lets the PEEK statements determine 
what was there when the interruption 
occurred. Hence, the "interactive" 
part of the title. 

The program has its limitations. 
You must press some keys to get a 
number. Its range is limited to 1 
through 65536 but it is somewhat flexi- 
ble; if you get the rhythm just right and 
are quick enough, you can create a dis- 
cernible pattern in the series of integers 
returned. However, if you just use it, it 
works fine. 

You will find this program most 
useful in applications where you need 
to sample small quantities from vary- 
ing ranges of parameters — quality con- 
trol, spot checks, time studies, etc. 
Generating long tables of random num- 
bers requires too much key punching. 
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Listing 1 






100 


TEXT : HOME 






110 


PRINT SPCC 4) "THE INTERACTIVE RANDOM GENERATOR" 






120 


FOR N = 1 TO 40: PRINT "**';: NEXT : PRINT 






130 


VTAB 4: INPUT "RANGE FROM 1 TO....? " ; A 






140 


R - INT ((( PEEK (79) * 256 + PEEK (78)) / 65536) 


* A) + 1 




150 


VTAB 8: HTAB 15: PRINT "** ";R?" ** 






160 


VTAB 16: PRINT "PLEASE PRESS SPACE BAR TO CONTINUE' 






170 


PRINT "OR ANDY OTHER KEY TO END." 






180 


GET A$ 






190 


IF A$ = CHR$ (32) THEN VTAB 4: CALL - 958- GOTO 


130 




200 


HOME : VTAB 10: HTAB 18: PRINT "BYE I": END 





Left of Equal Sign MID$ 
in Applesoft 

Gustavo Criscuolo, Instituto Univer- 
sitario, Pedagogico Experimental de 
Maturin, Venezuela 



This utility will make life easy when 
you work with strings. It replaces a part 
of a string with another string by turn- 
ing the original one into substrings (by 
means of the MID$ function) and con- 
catenating. It takes a long time and a 
lot of memory to concatenate. Sooner 
or later memory becomes full of non- 
useful strings and the garbage collec- 
tion process spends time moving strings 
to the top of RAM. 



Other BASIC implementations have 
a "left of equal sign" MID$ function. 
This function takes a string and puts it 
into the middle of another string. No 
more room is used; only some posi- 
tions of RAM change their contents. 



To extend Applesoft BASIC, the 
ampersand technique is used. Exten- 
sive use of Applesoft subroutines is 
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made to get a short machine- language 
program but no attempt is made to op- 
timize the code. 



The program is loaded at $958B 
(decimal 38283) and is only $75 bytes 
long. It must be loaded with the proper 
disk command, protected by a HIMEM: 
38283, and initialized using a CALL 
38283. It works with any type of string, 
including subscripted ones. The general 
calling procedure is: 

& MID$(A$(K),I,J) = B$(M) 

with the following meanings: 

A$ the string where the replacement 
takes place 

K if A$ is a subscripted string, its 
subscript 

I start of replacement 

J number of characters to replace 

B$ the string where the characters 
come from 

M if B$ is a subscripted string, its 
subscript 

(Continued on next page) 
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The A$ and B$ strings both can be 
double subscripted. No attempt was 
made to check for the conditions 



J < = LEN(B$(M)) 
l+J< = LEN(A$(K)) 



Also, if A$ points to a string in the pro- 
gram text, it will be changed. With this 
trick, you can code a program that tells 
you how many times it has been run. 

Mark and Release Procedures 
in Applesoft 

In languages such as Pascal, there is 
a concept of a Heap. It is a part of 
memory where it is possible to define 
some variables and to dispose of them 
when they are no longer needed. It is 
possible to implement a similar tech- 
nique in BASIC, using strings, and 
realizing that the pointer to the bottom 
of string storage is the zero page loca- 
tions $6F,$70 (111,112 decimal). 



First select some strings that will be 
the permanently allocated ones. Define 
them in the program, taking into ac- 
count that you must force the string to 
be allocated in the top of RAM (e.g., 
use A$ = "$$$$" + "$"). Then save the 
pointer; you can use 



IL = PEEK(111):IH = PEEK(112) 

Now you can define other strings 
(e.g. in a subroutine) . When the work is 
over and these strings are no longer 
useful a simple 

POKE 111JLPOKE 112.IH 

will release the memory for future use. 



You must take care not to activate 
the garbage collection procedure. Gar- 
bage collection is activated if the 
pointer to the end of numeric storage in 
zero page locations $6D,$6E (decimal 
109,110) collides with the pointer to 
the bottom of string storage. 
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Listing 1: Left/MID$ 



003E 

0071 

STORAGE ROUTT 

007B 

0083 

OR{ POINTS TO 

00AD 

00D0 

00EA 

00B1 

00B7 

DPE3 

D97C 



NES 

3 
4 

LENGTH ) 
5 



9 
10 
11 



p T2 
FRESPG 

PT3 

VARPNT 

STRG2 

EQUALS 

MID$ 

CHRGET 

CHRGOT 

PTRGET 

UNDEP 



EPZ $3E 
EPZ $71 

EPZ $7B 
EPZ $83 

EPZ SAD 
EPZ $00 
EPZ $EA 
EPZ $B1 
EPZ ?B7 
EQU $DFE3 
EQU $D97C 



? TEMPORARY POINTER FOR STRING 



; POINTER TO VARIABLES DESCRIPT 

; POINTER TO A STRING 
j TOKEN FOR EQUALS SIGN 
; TOKEN FOR MID$ COMMAND 



?FTND VARPNT 

; DISPLAYS UNDEF STATEMENT ERRO 





DEBB 








12 


CHKOPN 


EQU 


$DEBB 


; CHECKS FOR "(" 




DEBS 








13 


CHKCLS 


EQU 


$DEB8 


i CHECKS FOR " ) " 




DEBE 








14 


CHKCOM 


EQU 


$DEBE 


; CHECKS FOR " , " 




DECO 








15 


SYNCH R 


EQU 


$DEC0 


r DISPLAYS ERROR IF CHARACTER 




0800 








16 


j POINTED 


TO 


3Y TXTPTR 


<> ACCUMULATOR 




E5E2 








17 


MOVSTR 


EQU 


$E5E2 


APPLESOFT'S STRING MOVER 




E6F8 








18 


GETBYT 


EQU 


$E6F8 


r EVALUATES FORMULA POINTED TO 




0800 








19 


;BY TXTPTR AND STORES 


THE RESULT IN FAC 




00A1 








20 


FAGLO 


EPZ 


$A1 






0800 








21 


* 










958B 








22 




ORG 


$958B 






958B 








23 




OBJ 


$800 






958B 








24 


* 










958B 








25 


* 










958B 


A9 


9B 




26 


TIMP 


LDA 


#START 


;SET UP AMPERSAND 




958D 


8D 


F6 


03 


27 


TEMP 


STA 


$3F6 


? VECTOR ADDRESS 




9590 


A9 


95 




28 




LDA 


/START 






9592 


8D 


F7 


03 


29 




STA 


$3F7 






9595 


A9 


60 




30 




LDA 


#$60 


r DUMMY RTS 




9597 


8D 


BB 


95 


31 




STA 


TIMP 


fAT TIMP 




959A 


60 






32 




RTS 








959B 


20 


B7 


00 


33 


START 


JSR 


CHRGOT 


;GET TOKEN 




959E 


C9 


EA 




34 




CMP 


#MID$ 


;IF MID$ TOKEN 




95A0 


FO 


03 




35 




BEQ 


UNO 


fTHEN CONTINUE 




95A2 


4G 


7C 


D9 


36 




JMP 


UNDEF 


rELSE ERROR 




95A5 


20 


Bl 


00 


37 


UNO 


JSR 


CHRGET 


:GET NEXT BYTE 




95A8 


20 


BB 


DE 


38 




JSR 


CHKOPN 


r CHECK FOR "{" 




9 SAB 


20 


E3 


DF 


39 




JSR 


PTRGET 


;GET DESCRIPTOR ADDRESS FOR PA 




SSED 


VARIABLE 














95AE 


AO 


01 




40 




LDY 


#$1 


;GET ADDRESS OF TARGET STRING 




95B0 


Bl 


83 




41 




LDA 


(VARPNT) 


Y 




95B2 


8D 


8D 


95 


42 




STA 


TEMP 


;AND SAVE AT TEMP 




95B5 


C8 






43 




I NY 








95B6 


Bl 


83 




44 




LDA 


(VARPNT) 


Y 




95B8 


8D 


8E 


95 


45 




STA 


TEMP+1 






95BB 


20 


BE 


DE 


46 




JSR 


CHKCOM 


; CHECK FOR COMMA 




95BE 


20 


F8 


E6 


47 




JSR 


GETBYT 


;GET START OF REPLACEMENT 




95C1 


A5 


Al 




48 




LDA 


FACLO 






95G3 


85 


3E 




49 




STA 


PT2 


?AND STORE AT PT2 




95G5 


20 


BE 


DE 


50 




JSR 


CHKCOM 


r CHECK FOR COMMA 




95C8 


20 


F8 


E6 


51 




JSR 


GETBYT 


;GET LENGTH OF REPLACEMENT 




95CB 


A5 


Al 




52 




LDA 


FACLO 






95CD 


85 


7B 




53 




STA 


PT3 


7 AND STORE AT PT3 




95CF 


20 


B8 


DE 


54 




JSR 


CHKCLS 


; CHECK FOR " ) " 




95D2 


A9 


DO 




55 




LDA 


# EQUALS 


7 NEXT SHOULD BE EQUALS SIGN 




95D4 


20 


CO 


DE 


56 




JSR 


SYNCH R 


;ELSE SYNTAX ERROR 




95D7 


20 


E3 


DF 


57 




JSR 


PTRGET 


7 GET ADDRESS OF SOURCE STRING 




95DA 


AO 


01 




58 




LDY 


#$1 






95DC 


Bl 


83 




59 




LDA 


(VARPNT) 


Y 




95DE 


85 


AD 




60 




STA 


STRG2 


7 AND STORE AT STRG2 




95E0 


C8 






61 




I NY 








95E1 


Bl 


83 




62 




LDA 


(VARPNT) 


Y 




95E3 


85 


AE 




63 




STA 


STRG2+1 






95E5 


06 


3E 




64 




DEC 


PT2 






95E7 


AD 


8D 


95 


65 




LDA 


TEMP 


7 RECOVER ADDRESS OF TARGET STR 




ING 




















95EA 


18 






66 




CLC 








95EB 


65 


3E 




67 




ADC 


PT2 


7 ADD TO START OF REPLACEMENT 




95ED 


85 


71 




68 




STA 


FRESPG 


fAND STORE AT FRESPG 




95EF 


AD 


8E 


95 


69 




LDA 


TEMP+1 






95F2 


69 


00 




70 




ADC 


#$0 






95F4 


85 


72 




71 




STA 


FRESPC+1 






95F6 

GH) 

95F8 

W) 

95FA 


A4 


AE 




72 




LDY 


STRG2+1 


7 LOAD Y WITH SOURCE ADDRESS (HI 




A6 


AD 




73 




LDX 


STRG2 


;LOAD X WITH SOURCE ADDRESS { LO 




A5 


7B 




74 




LDA 


PT3 


;LOAD ACCUM W/LENGTH OF REPLAC 




EMENT 


















95FC 


20 


E2 


E5 


75 




JSR 


MOVSTR 


;DO MOVE 




95FF 


60 






76 




RTS 








9600 








77 




END 
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TAKE CHARGE OF YOUR COLLECTION OF DISK-BASED SOFTWARE! 

THE SOFTWARE MANAGEMENT SYSTEM 

DISK LIBRARY is an elegant, user-oriented system for creating and 
maintaining a thorough, cross-referenced index of all your disk- 
based programs and data files. It provides for AUTOMATIC entry into 
your library file of the full catalog of any Apple* diskette. Disks for- 
matted under other operating systems (such as Pascal and CP/M*) 
are easily entered from the keyboard. Written entirely in machine 
code, DISK LIBRARY'S operation is both smooth and swift. 



EASY TO OPERATE: 

• Menu-driven • User-definable prompt defaults • Single keystroke 
operation • Full featured Editing • Super fast Sorts by any field (1200 
items sorted in 4 seconds!) • Works with all disks created under DOS 
3.1, 3.2 and 3.3 • User definable Program Types (e.g., Business, 
Game, Utility) of up to 1 5 characters each can be assigned to each 
program entry with single keystrokes or via block actions • On- 
screen and printed Summaries, by File type (Integer, Applesoft, 
Binary, Text) and by Program Type (e.g., Accounting, Graphics, 
Music) • Block Actions (global editing/deleting) • Instant Searches 
... by full or partial string (find any item in 1 /3 sec!) • New Files can 
be Appended to existing records, in memory or on disk* Unique 
Feature: User can redefine the Disk Volume Number displayed by 
the DOS Cajalog Command • A Unique Volume Identifier and Disk 
Title can be Assigned to each disk entry in your library file • Printed 
Reports are attractively formatted for easy readability 




i EASY TO LEARN: 

I A 75 PAGE, PROFESSIONALLY 
PREPARED USER'S GUIDE IS PROVIDED: 

i INCLUDING: 

• Introductory Tutorial, will have you using Disk Library 
inlOminutes • Advanced Tutorial, enables you to 
Disk Library's many advanced features • Reference Section, ^ % 
provides quick answers for experienced users • Applications 
Section, gives you many ideas for maintaining your library 

• Index, enables you to find whatever you need 



SYSTEM REQUIREMENTS: 48K Apple II or 11+ with DOS 3-3 

Suggested Retail Price $59.95 



DISK LIBRARY is licensed by 

■ ■MODULAR 
□■MEDIA 



'Apple, Apple II and Appie 11+ are registered trademarks of Apple Computer, Inc CP/M is a registered trademarK of Digital Research, Inc 

soutnuuesteRn data systems 

P.O. BOX 582-M . SANTEE, CALIFORNIA 92071 . 714/562-3670 



What's Good for the Space Shuttle 
is good for your Apple II! . . . 



MICROWARG, creator of OS-9/BASIC 



and corporations Worldwide) joins with STELLATION TWO 
to deliver the same Operating system and Programming 
aneuage to the APPLE II. 



OS-9/BASIC 09 are the result of a 3 year research project-designed with 
mind. This "Operators dream machine" combines with THE MILL micro| 
Apple II users with software features previously reserved for Mainframes ar 



BASIC 09 WORK FOR YOU 




MiCROWARG, 



The Lobero Building P.O. Box 2342 
Santa Barbara, Ca, 93120 

(805)966-1140 TELEX 658439 
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NEW PET/CBM SOFTWARE 

Lei Computer Mat turn your Pet into a 
Home Arcade! 

BOMB S AWAY - Can yag slop htm? The era ay bomber drops ihe bombs 
from ihe top d1 ihe screen. You gel 3 buckets to catch I hem. Before you know 
ii bombs are faJfing so (a$i you wonder ^hen he will stop. Just when you think 
you have him under control your bucket gets smaller . Is your hand quicker 
than your eye? 
Cass. BK , . . _ , _ $9 95 

ASTEROIDZ — lis your sh»p vs. a s^arm of killer gam ma roidz. You are on a 
colfision course and musl deilroy them before ihey bias! you into ihe next 
galaxy. Four levels of play. Has hyper space keys inal move you around 
Arcade slyte enier lainmeni at Us hnest. deat graphics and sound 
Cass. flK $9 95 

MUNCHMAN — How many dots can you cover? Ii s you against (he 
computer munchers ZIP and ZAP Can you clear the maze first or unit they 
get you? Number keys move you up. down, right and letl GREAT 
GRAPHICS AND SOUND 
Cass 8K 1995 

TARGET COMMAND — Its you against a barrage of enemy lasers that are 
aimed ai your ammo dumps. Sight in on ihe targe's and score as many hits as 

you dare. As your skrtl increases so does ihe the difficulty - (5 levels to 
select) Thus is an arcade style game with greal graphics and sound effects A 

musl (or your PET, CBM 

Cass. SK + + T ► ».,.♦>•-*, * , $9.95 

OLD NEW ROM - 40 CHR. SCREEN 

WRITE FOR FREE CATALOG OF VIC/PET SOFTWARE 

PLEASE ADD $1.00 PER ORDER FOR SHIPPING 

COMPUTER MAT • BOX 1664R • LAKE HAVASU CITY, AZ 86403 

VIC AND PET ARE TRADEMARKS OF CBM 



GOSUB International, Inc. presents 

The CARDBOARD for the VIC 20! The CARD- 
BOARD is an expansion motherboard for use with 
Commodore's VIC 20 series computers. It has six 
slots that will accept any VIC-compatable cartridge 
in any configuration. 

Increase RAM up to 40K and use several utility 
ROMs plus have several games online, all switch 
selectable! 

The CARDBOARD can be daisy- chained, giving the 
user an almost unlimited number of available expan- 
sion slots. 

A system reset switch has also been added to the 
CARDBOARD allowing the user to select and/or 
restart games on ROM without turning off the 
computer. 

All this for only $119. 95 plus $1,50 S/H 

To order send check oi money order tot 

GOSUB International, Inc. 

$01 E* Pawnee, Simte 410 

WichiTA, Kansas 67211 

(516) 265-9858 

VISA <md Master Card phone ord&is also accepted^ 




*t* • Prints 



DOU0LETIME PRINTER (DP.) is on extremely thorough 
and extensive package, which con easily poy for itself 
in a m otter of weeks in computer time sovingy 

Until now, whenever the Apple was ourputring infor- 
mation to O printer, irwos out of commission" until the 
printing was done. Because most printers are rather 
slow, this con mean a loss of use of the computer ranging 
5 to 10 minutes to an hour or more, 
D.P> now liberates your Apple from being "printer- 
bound" by allowing the computer ro essentially do two 
things or once With D.P. installed you'll be able to 
continue using many programs in the "foreground" while 
the printer faithfully prints out the desired files in the 
"background". 

DJ*. is more than just a simple interrupt driven utility 
though Over a ye or of development has gone into 
producing a complete and integrated package with a 
wide variety of functions and features. A few of these are: 



Prints DINARY, TEXT or APPLESOFT files with no con- 
versions necessary. All files ore printed directly from the 
diskette so very little internal computer memory is 
used r and rhere ore no restrictions on number or 
size of the documents printed, other than your systems 
disk capacity. 

• Files can be FORMATTED when desired to Include 
margins, paging and even variable number of copies. 

• Files can be prioritized so thot other users can add 
their files to o diskette while printing is in progress. 
Urgent files con supercede earlier fiJes ploced on 
the disk. 

• DOUBLETIME PRINTER is supplied with a special F8 
ROM (under special' license from Apple Computer, 
Inc.) and on inrerrupr driver interface card. Doth are 
simple to install by either end-user or dealer, 

SYSTEM REQUIREMENTS: 48K Apple 1I/II+ with DOS 3.3 

Apple. Apple ll Apple ll* are Trademark* or Apple Computer Inc 



P.O. BOX 5B2-M • SAI4TEE. CALIFORNIA 92071 * 71 4/S62-367Q 
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1. Creative Computing 8, No. 2 (February, 1982) 

Haley, Kenneth M., "Picture Packer Revisited/' pg. 
116-124. 

A real advancement in the technique of storage and 
fast loading of Apple hi-res picture screens. It is possi- 
ble to have 20-40 pictures stored on a single Apple 
disk side. 



2. The Apple Barrel 5, No. 1 (February. 1982) 

Kramer, Mike, "EXEC Files on the Apple II," pg. 14-17. 

Using EXEC files which can contain either lines of 
BASIC program code or a sequence of keyboard com- 
mands. Useful in setting up an automatic operation 
mode. 



3. The Michigan Apple-Gram 4, No. 2 (February, 1982) 

Thomka, Chuck, "Mods for the Apple Two-Piece Key- 
board," pg. 22-25. 

Detailed information on the Apple keyboard and how 
to take advantage of its features. 



4. Computing Today 3, No. 12 (February 1982) 

Smith, Bruce F., "Graf-Rite," pg. 73-75. 

Define and store your own characters in the 
6502-based British microcomputer, Acorn Atom. 
Ideal for labeling graphs or annotating diagrams. 



5. Interactive Issue No. 7 (January, 1982) 

Hance, Joe, "Centronics-Type Printer Driver," pg. 7. 

An interface to use an Epson MX- 80 printer with an 
AIM 65. Gives hardware connections and a brief 
machine-language routine. 



6. MICRO No. 45 (February, 1982) 

Flynn, Christopher J., "Formatting AIM Assembler 
Listings: A PL/ 65 Approach," pg. 19-26. 

A program to reformat AIM assembler listings. The 
new listings are much easier to read than the standard 
20-column assembler format. 



7. Sym-Physis 2, No. 4, Issue No. 10 (Oct/Nov/Dec, 
1981) 

Anon., "How to Power-Up into a Running BASIC Pro- 
gram," pg. 2-5. 

A utility routine for the SYM to implement a turnkey 
system, including protection provisions. 



8. PEEK(65) 3, No. 2 (February, 1982) 

Manley, D.R., "Two Random Access Files," pg. 9-13. 

How to convert OSI BASIC to use Device #& as a ran- 
dom access file device, just like #6. 



9. The Aardvark Journal 2, No. 6 (February, 1982) 

Windes, Stanley, "OSI and the Shugart SA4800," pg. 2-5. 

How to implement the 5 Va -inch drive on the Super- 
board C1P from OSI. Includes power supply, data 
separator, interface board, controller to disk connec- 
tions, and HEXDOS and OSI 65D software. 



10. Compute! 4, No. 2 (February, 1982) 

Macnaughton, Robert, "Measure Time Intervals with 
the PET Parallel User Port," pg. 160-165. 

A machine-language program that can be used on the 
PET to measure seven successive small time inter- 
vals, using the CBM parallel user port and eight 
phototransistors. 
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Software Catalog 



Name: Atmona-1 

Machine-Language Monitor 

System: Atari 400/800 
Memory: 16K RAM 
Language: 6502 machine language 
Hardware: Atari 400/800 
Description: This monitor provides you 
with the firmware support that you need to 
get the most out of your powerful system. 
Atmona-1 comes on a bootable cassette. No 
cartridges required. Disassemble, memory 
dump hex plus ASCII, change memory loca- 
tions, blocktransfer, fill memory block, 
save and load machine-language programs, 
start machine language programs. (Printer 
optional.) Comes with introductory article 
on how to program the Atari computer in 
machine language. (Available also in ROM.) 
Price: $19.95 

Includes description and cassette 
Available: 

Elcomp Publishing, Inc. 

53 Redrock Lane 

Pomona, CA 91766 

(714} 623-8314 



Name: Apple Flasher 

System: Apple II with Applesoft, DOS 
3.3; Apple II Plus, DOS 3.3; 
Apple III (Emulation Mode) 
Memory: 48K 

Language: Assembly, Applesoft 
Hardware: Disk II, paddles optional 
Description: Flash graphics files directly to 
your TV screen as pictures at incredible 
speed with Apple Flasher. The program 
bypasses ordinary DOS routines in order to 
display files as pictures in about 1.5 seconds 
each. Display modes include: 1) single key 
selection of any file on disk, 2) continuous 
scan of all files on disk with new picture on 
screen every 1.5 seconds, 3) carousel projec- 
tor simulation controlled by either of the 
game controllers (or the keyboard) to dis- 
play screens from one or two drives with in- 
stant access to both next and previous 
"slide," 4) and continuous display of all 
screens on one or two drives (up to 30 pic- 
tures) with individual control of display 
time for each picture as used in advertising 
displays, etc. Unlabelled disks may be 
searched for presence and names of hi-res 
screen files with two key strokes per disk at 
rate of five to ten seconds per disk. 
Price: $34.50 plus $1.00 handling for 

mail orders 

(NY residents add tax) 

Includes diskette, 8-page manual. 
Author: Paul W. Mosher 
Available: 

Crow Ridge Associates 

P.O. Box 90 

New Scotland, NY 12127 

(518) 765-3620 



Name: B.C. Animation 

System: OSI CIP/Superboard 
Memory: 8K minimum 
Language: 8K BASIC in ROM 
Hardware: Blank cassette tape 
Description: B.C. Animation is a 
BASIC /machine-language hybrid. It allows 
the user to create pictures stored as 
' 'frames" and may call or erase any of these 
frames to or from anywhere on the screen. 
Using this program, a large group of 
graphics characters can be displayed, erased, 
or moved as fast as one character can 
without it. It is simple to use and is user 
modifiable. If you have a different screen 
size or memory configuration, the entire 
program can be modified by changing only a 
few lines. The machine language routines 
and stored picture "frames" are totally relo- 
catable. This package includes two pro- 
grams: the "Editor," the program used to 
create and save picture "frames;" and the 
"Subroutine," the machine-language rou- 
tine used with your programs to display the 
stored frames. 
Price: $15.00 plus $1.00 for postage and 

handling 

Includes cassette tape, detailed 

instructions for use and possible 

modifications, and a software catalog. 
Author: Craig Zupke 
Available: 

B.C. Software 

9425 Victoria Dr. 

Upper Marlboro, MD 20772 



Name: DOW2000 & OPTION43 

System: Apple II 
Memory: 48K 
Language: Applesoft 
Hardware: Disk 3.3/3.2, printer optional 
Description: Stock Market Analysis will 
determine price projections based on a 
stock's BETA coefficient or Relative 
Strength Number and the Dow Jones 
Average. Projections are made as you vary 
the DOW (What if...); on one stock or entire 
portfolio with single scan, quick scan, or 
variable scan of values. The option program 
will give you the percent of increase of the 
option months to determine which month 
and strike price option to buy for a given 
stock. Included is the booklet "The Art of 
Timing Your Stock's Next Move." Author 
in market 17 years and former Registered In- 
vestment Advisor with S.E.C. 
Price: $29.95 

Includes booklet (booklet alone $5.95). 
Author: CIAC: Patrick and 

David Calabrese 
Available: 

Bit 'n Pieces Series 

P.O. Box 7035 

Erie, PA 16510 



Name: Merlin Dial/Data 

System: Apple II, Apple II Plus 
Memory: 48K 
Language: BASIC (Applesoft) 
Hardware: Two disk drives, micro model 
Description: Allows Apple user immediate 
access to Merlin data base which has been 
used by investment professionals for more 
than a decade. Gives daily and historical 
price information for all securities, options 
and commodities on all major exchanges. 
Automatic accesss and file handling. All 
prices are updated daily and system is 
Compu-trac compatible. Also available to 
other micro users who wish to write their 
own programs. 
Price: $75.00 minimum— Apple software 

Daily pricing service— $45.00 monthly 

minimum plus monthly usage charges. 

Includes manual, data base creation and 

maintenance plus automatic access to 

Merlin DIAL/DATA time sharing system 

for prices. 
Available: 

Remote Computing Corp. 

Dept. MS 

1044 Northern BLvd. 

Roslyn, NY 11576 

(516) 484-4545 



Name: Paulson Package 

System: OSI C1P 
Memory: 4K 

Description: Crazy Bomber (4K graphics). 
You are confronted by aliens in a gigantic 
ship that is directly above you. The alien 
ship has ten bomb racks with five bombs in 
each rack. When most of the bombs have 
dropped, the racks are refilled. Your mission 
is to destroy the bombs before they hit the 
ground. Each time the racks are refilled, the 
bombs come down faster. You lose if 10 
bombs get past you. UFO Attack (4K 
graphics). You control a killer satellite to 
defend against a fleet of UFO ships. The top 
five scores are displayed at the end of each 
game. Fast moving fun with excellent use of 
graphics. Meteor Fallout (4K graphics). 
Looks like it stepped right out of the arcade! 
You destroy moving meteors before they hit 
the surface of your planet. Each meteor falls 
at a different angle and speed. The meteors 
also make unexpected changes in direction 
at times and will test your skill in making 
decisions quickly. The graphics are 
excellent! 
Price: $9.95 Crazy Bomber 

$8.95 Meteor Fallout 

$8.95 UFO Attack 
Author: Thomas A. Paulson 
Available: 

Aurora Software Associates 

37 S. Mitchell 

Arlington Heights, IL 60005 

(312) 259-3150 
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Software Catalog (continued) 

Name: CIPHER/K 

System: Apple, OSI, other 6502 systems 
Memory: 8K 

Language: BASIC and 6502 ASM 
Hardware: Cassette tape, disk 
Description: State of the art public key crypto- 
graphic system. Capable of serial communi- 
cation. CIPHER/K provides a highly secure 
data encryption and decryption system for 
personal and business communication. 
Author: D. Wolf, Ph.D. 
Available: 

D. Wolf, Ph.D. 

Box 565 

Port Hueneme, CA 93041 



Name: ESTHER 

An Exericse in Artificial 
Intelligence 

System: Any FLEX-based 6809 or 6800 

system 
Memory: 16K minimum 
Language: 6809 Assembly Language 
Hardware: 6809 running FLEX 
Description: ESTHER is one of ELIZA's best 
students. It is based on the classic MIT pro- 
gram. A few features have been added. 
ESTHER remembers names, drops names, 
uses the player's name, answers third per- 
son replies, echos keywords, and much 
more. The system includes more than 75 
keywords and more than 48 replies. Fea- 
tures auto formatting according to the line 
length of your terminal. The program is 
both educational and fun. The source code 
will show you how to experiment with AI. 
Price: $39.95 for object code 

$59.95 for object and source code 

Includes FLEX disk and manual. 
Available: 

Frank Hogg Laboratory 

130 Midtown Plaza 

Syracuse, NY 13210 

(315) 474-7856 



Name: 



System: 

Memory: 

Language: 



Machine-Language Graphics 
Writer 

OSI CIP/Superboard 

8K 

BASIC in ROM 
Description: The program contains a draw 
routine. Using the polled keyboard, you can 
draw pictures on the screen with any of the 
OSI graphic characters except for the 
32-dec. blank space. Once a picture is 
drawn, the computer will generate a 
machine-language program to write the 
same picture that is on the screen. The 
machine-language program is then saved on 
tape for later use. 
Price: $9.00 

Includes cassette and detailed 

instructions. 
Author: Brian Zupke 
Available: 

BC Software 

9425 Victoria Drive 

Upper Marlboro, MD 20772 



"Omnitrend," and 



Name: Omni ware 

System: Apple II Plus 
Memory: 48K 
Language: BASIC 
Hardware: 3.3 DOS, disk drive 
Description: Omniwaie consists of "Omni- 
file, ' ' a full featured file manager and report 
generator; "Omnitrend," a powerful multi- 
ple regression trend analysis program with 
statistical calculation and extensive hi-res 
graphics; and "Omnigraph," a flexible data 
plotting program that allows X-Y plots, bar 
charts and pie charts. 
Price: $129.95 

Includes "Omnifile,' 

"Omnigraph." 
Author: Keith Booker 
Available: 

Educational Computing Systems, Inc. 

106 Fairbanks 

Oak Ridge, TN 37830 

(615) 483-4915 



Name: Menu Generator 

System: Apple II Plus 

Memory: 48K 

Language: Applesoft BASIC 

Hardware: One disk drive with DOS 3.3, 

printer optional 
Description: Menu Geneiatoi makes it easy 
for you to create custom computer menus 
for your Apple II. Just fill out one screen 
form to define each menu option and what 
action to take when that option is selected. 
Your menus can run BASIC or machine- 



language programs, boot another disk, ex- 
ecute user-written BASIC statements and 
perform any valid DOS operation. Menu 
Geneiatoi will compile your inputs into a 
neat, attractively formatted screen menu 
and then autmatically write a documented 
bug-free BASIC program to generate and 
process the menu. 
Price: $39.95 

Includes program disk, back-up disk, and 

40-page manual. 
Author: Robert N. Crane 
Available: 

Crane Software, Inc. 

16835 Algonquin 

Suite 611 

Huntington Beach, CA 92649 

Name: Word Games 

System: Apple II 3.2 or 3.3 DOS 
Memory: 48K 
Language: Applesoft 

Description: Woid Games includes three 
games for fun and vocabulary building, for 
ages eight to adult. In each game the user 
asks for clues and makes guesses to find a re- 
lated word pair. Original entries can be added. 
Price: $24.95 

Includes Flip Flop, Flip-E Flop-E, Code 

Rhyme. 
Author: Mary Berry 
Available: 

Merry Bee Communications 

815 Crest Drive 

Omaha, NE 68046 



What 

would you give 

to have 

unlimited UNITS 
on your 

Apple II*? 



mtFy^tf 
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VOUUME2 
now iwailable! 



NIBBLE EXPRESS 



TABLE OF COMIE 

CHAMP 

Working Out with CHAMP 

Amper-Reader 

Hex/Dec Codes Without Conversio 
Auto Run and Tape Protection . . . 

MRS 

Le Mans 

Inputting Strings With Commas . . . 

Phantom Numeric Pad 

Disk Snooping Part 1 

Apple Paintbox 

Mad Mad Cube 

Disk Snooping Part 2 

Applsoft Linefinder 

Direct Keyboard Disk Commands 
Converting Muffin to Demuffin . . . 

Apple STAR System 

Disk Snooping part 3 

Intesoft Connection part 1 

Trap 'Em 

Fast Data Format 

Quick and Easy Hi-Res 

Apple RAT 

Binary Disk Copy 

Disk Master 

Trap/Step 

Biorhythms 

Intesoft Connection part 2 

Teleprocessing 

Lo-Res Screen Dump 

Apple Tricks . . . Reset Trap 

Mini-Amper Edit 

How to Enter Assembler Listings . 
Free Cat for Apple DOS Users . . . 
M.A.P.S 



Amper Jump &. TSort 

Apple Artist 

Pascal Lo-Res Graphics 

Big CAT 

Amper Store Recall 

D.A.R.T 

Print Use 

Intesoft connection III 

Lazer Blaster 

Auto Repeat Key 

Poor Boy's LE 

Catsup— Catalog Supervisor 

TRAC Budget 

TRAC Graphics 

TRAC Plus 

Archives 

Intesoft connection IV 

Command Changer • (missing the 
DOS Remover 



NIBBLE EXPRESS VOLUME 2 
NOW AVAILABLE! 

The 1981 Anthology of the major artides 
and programs is underway! It contains 
up-to-date enhancements and corrections 
to programs which appeared in Volume 2 of 
NIBBLE. 

Even if you have all 8 issues of NIBBLE in 
1981, you'll want The Express to have 
updated program listings in one convenient 
package! 

200 solidly packed pages with major 
programs and articles for your Apple! A 
MUST for your Library! 

NIBBLE EXPRESS will be an invaluable 
reference for your Apple now and for years to 
come! 

for only $14.95 (plus shipping) you can make Nibble 
Express a permanent part of your library. 

ORDER YOUR COPY NOW! 



NIBBLE 

P.O. Box 325 
Lincoln, MA 01773 

Yes! I want NIBBLE EXPRESS Vol. 2 in my library! 
Here's my D Check □ Money order 
for $14.95 plus $1.75 postage/handling. (Outside 
U.S. add $2.75 for postage/handling). 

□ Also send me NIBBLE EXPRESS Vol. 1 at $12.95 
plus $1.75 postage/handling (outside U.S. add $2.75 
for postage/handling). 



Master Card & Visa Accepted 



Card # 

Telephone _ 

Name_ 

Street 

City 



. Expires . 



State _ 



Zip- 



Your check or money order must accompany your order to qualify. 
Outside U.S.: Checks must be drawn on a U.S. Bank. 
'Apple is a registered trademark of Apple Computer Company. 
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63 

65 

67 

76 

82 
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[Software Catalog (continued) 
Name: Readtest — An English Text 
Analysis Program 
System: 6809 FLEX 
6800 FLEX 
Memory: 16K required (lower memory) 
Language: 6809 assembly language 
Hardware: Any 6809 system that runs 
FLEX 
Description: Readtest is a powerful tool 
designed to help the student writer as well 
as the experienced writer keep a check on 
his readability. It is based on the readability 
research of Dr. Rudolf Flesch. It tells you 
how many words you have written, how 
many sentences you have used, and com- 
putes the average sentence length. It checks 
to see how many times you use key personal 
words and counts the number of names 
(proper nouns) in your writing. It also 
checks the number of affixes in your 
writing. It then rates your text according to 

Hits difficulty. 
Price: $54.95 for object code 
$74.95 for object and source code 
Includes FLEX disk, manual and program 
Available: 
Frank Hogg Laboratory 
130 Midtown Plaza 
Syracuse, NY 13210 
(315) 474-7856 



Name: Client Write-Up System 

System: Commodore 8032 CBM 

Memory: 32K RAM 

Language: Commodore 4.0 BASIC and 

Assembler 
Hardware: 8050 dual disk drives 
Description: INI's Client Write-Up System 
allows accountants to maintain the books 
and produce all financial statements for up 
to 99 different clients. The accountant can 
customize each client's chart of accounts, 
and each client's reports. (INI's system 
features a completely user-definable report 
generator — both content and format.) 
Powerful budget reports can be produced 
using a unique interface with VisiCalc. 
Price: $850.00 

Includes system disk, one demo client, 

user's manual, plus software support. 
Available: 

INI Inc. 

4013 Chestnut St. 

Philadelphia, PA 19104 



Name: 

System: 

Memory: 

Language 

Hardware 



GraphtrixTM 1<3 

Apple II 

48K 

Applesoft in ROM 

See description 
Description: Graphtrix 1.3 Matrix Graphics 
System is the latest version of Data Trans- 
forms' multi-printer graphics screen dump 
for the Apple II. Graphtrix 1.3 will make 
hard copy of any Apple II hi-res graphics 
screen, and will place the graphic anywhere 
in the text the user wishes. Graphtrix 
Matrix Graphics System transforms the 
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Applewriter into the most powerful text 
editing system available. It requires one of 
the following printers; Anadex 9500/9501/ 
9000/9001, Centronics 739/122, Epson 
MX-100/MX-80/MX-70, IDS 440G/445G/ 
460G/560G, ITOH 8510, MPI 88G, NEC 
8023, Okidata 82A/83A, Silentype. Also re- 
quired are one of the following parallel in- 
terface cards: Apple standard/centronics, 
CCS 7728, Epson APL, Grappler, Mountain 
CPS, Prometheus PRT-1/Versacard SSS- 
AIO, TYMAC. 
Price: $65.00 
Available: 

Data Transforms 

616 Washington St. 

Denver, CO 80203 



Name: AccuRec, The Integrated Time 

Recorder/ Wage Summary 
Program 

System: Apple II 

Memory: 48K 

Language: Applesoft 

Hardware: Single disk drive, Time/ Clock 

Interface Board, Printer 
Description: AccuRec is an advanced atten- 
dance recorder/ reporting system. Employees 
clock in and out; it generates a report (upon 
command) of the daily /weekly /total hours 
and gross wages (including overtime). 
Eliminates time-consuming conversion of 
time cards into paycheck. Daily/weekly 
records can be displayed for reference and 



monitoring. Also functions as a job cost 

recorder, recording times and computing job 

costs. 

Price: $179.95 

Includes shipping charges. 
Author: Daniel J. Cassidy 
Available: 

Individualized Operand (Io) 
Division of Cassidy Research Corp. 

P.O. Box 3030 

San Rafael, CA 94912 

(415) 459-3383 



Name: Waterloo microBASIC 

System: Commodore SuperPET, Voker- 
Craig 2900, 3900, 4900, 
Northern Digital microWAT 
Description: Waterloo microBASIC in- 
cludes ANS Minimal BASIC, with certain 
minor exceptions, and several extensions 
such as structured programming control, 
long names for variables and other program 
entities, character-string manipulation, 
callable procedures and multi-line func- 
tions, sequential and relative file capabili- 
ties, integer arithmetic, debugging facili- 
ties, and convenient program entry and 
editing facilities. 
Available: 

Waterloo Computing Systems Limited 

158 University Ave. W. 

Waterloo, Ontario 

Canada N2L 3E9 



What 

would you give 

to have your 

Apple II 

able to configure 

to any 

peripheral? 
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Software Catalog (continued) 



Name: Southern Command 

System: Apple II 

Memory: 48K 

Language: Applesoft in ROM 

Hardware: One disk drive 

Description: Battalion-level simulation of 

the Israeli counter-attack to cross Suez 

Canal during October War of 1973 against 

Egypt. Displayed on 28 x 39 hex grid map. 

Price: $39.95 
Includes diskette, rule book, map, player- 
aid card. 

Available: 
Strategic Simulations, Inc. 
465 Fairchild Dr. 
Suite 108 
Mountain View CA 94043 



Name: Comparative Buying 

System: Apple II, Apple II Plus with 

Applesoft in ROM 
Memory: 48K 
Language: BASIC 

Hardware: One disk drive, monitor or TV 
Description: This new informative con- 
sumer program explains the concepts of 
comparative buying. The diskette subjects 
are: 1] concepts of comparative buying, 2) 
decisions before buying, 3) effective sales 
buying, and 4) cash buying versus credit 
buying. 
Price: $165.00 

Includes documentation, supportive 

material, four disks. 
Author: Dr. Florence Taber 
Available: 

Interpretive Education, Inc. 

157 S. Kalamazoo Mall 

Suite 250 

Kalamazoo, MI 49007 



Name: Capitalization 

System: Apple II, Apple II Plus, Bell 

and Howell Apple 
Memory: 48K 
Language: Applesoft 

Hardware: Apple II, one disk drive (either 
DOS 3.2 or 3.3), printer 
optional 
Description: Two-disk program which 
teaches the basic rules of capitalization. 
Rules are presented followd by 25 practice 
sentences. Upper/lower case characters are 
used. Teacher can add/delete/modify 
sentences for each practice lesson. Test disk 
keeps detailed records of each student's er- 
rors. Immediate feedback for each response 
with varied graphic reinforcers. 
Price: $49.95 

Includes two diskettes and teacher's 

guide. 
Available: 

Hartley Courseware, Inc. 

P.O. Box 431 

Dimondale, MI 48821 

(616) 942-8987 



Name: The Vaults of Zurich 

System: PET, Atari 
Memory: 16K PET 
24K Atari 
Language: BASIC 

Description: Zurich is the banking capital of 
the world. The rich and powerful deposit 
their wealth in its famed impregnable 
vaults. But you, as a master thief, have 
dared to undertake the boldest heist of the 
century. You will journey down a maze of 
corridors and vaults, eluding the most so- 
phisticated security system in the world. 
Your goal is to reach the Chairman's 
Chamber to steal the most treasured posses- 
sion of all: the OPEC oil deeds! 
Price: $21.95 cassette 

$25.95 diskette 
Author: Felix and Greg Herlihy 
Available: 

Artworx Software Co. 

150 N. Main St. 

Fairport, NY 14450 

(716) 425-2833 

(800) 828-6573 



Name: Lock-It-Up 4.1 

System: Apple II or Apple II Plus 
Memory: 48K 
Language: Applesoft 
Hardware: DOS 3.3 

Description: Lock-It-Up 4.1 is a 
sophisticated copy-protection system in- 
cluding over thirty state of the art protec- 
tion features. It prevents copying of disk- 
ettes with any standard or "nibble" copiers 
including Locksmith 4.1. In addition, it 
allows the rapid duplication of diskettes 
protected with the system. 
Price: $195.00 
Includes two diskettes, manual, non- 
exclusive licensing agreement. 
Author: Jeff Gold 
Available: 
Double-Gold Software 
13126 Anza Drive 
Saratoga, CA 95070 
(408) 257-2247 



Name: Histogram Plot 

System: Apple II, DOS 3.3 
Memory: 48K 
Language: Applesoft 
Hardware: Disk drive, printer optional 
Description: Histogram Plot is an easy to 
use statistics package for the researcher, 
student and business man/woman in need of 
a quick, simple to use statistical data sys- 
tem. Histogram features input, save, and 
edit data options; variable graph size, demo 
files, display or printout of raw data, com- 
puted data, mean, median, standard devia- 
tion, expected cell frequencies, chi square, 
etc. 
Price: $39.95 

Includes 8-page manual 
Author: J. McFarland 
Available: 

Andent, Inc. 

1000 North Ave. 

Waukegan, IL 60085 



Name: S-C Macro Assembler 

System: Apple II or Apple II Plus, DOS 

3.3 
Memory: 32K or more 
Language: Machine code 
Hardware: Disk II 

Description: New version of our most 
popular product; adds macros, conditional 
assembly, and easier editing. Has 20 direc- 
tives and 29 commands. Powerful EDIT 
command with 15 subcommands. Co- 
resident editor/assembler allows fast 
modification, re-assembly, and testing. 
Assembles up to 6000 lines per minute. 
Source programs may be as large as your 
disk space. Comes with a 100-page manual 
and both standard memory and Language 
Card versions. Liberal upgrade policy for 
registered owners of previous versions. 
Price: $80.00 
Available: 

S-C Software Corporation 

P.O. Box 280300 

2331 Gus Thomasson 

Suite 125 

Dallas, TX 75228 

(214) 324-2050 



Name: Mailing Label Package 

System: OS65U 

Memory: 48K 

Language: BASIC 

Hardware: Ohio Scientific C-2 or C-3 

Series 
Description: This elaborate mailing pro- 
gram contains a direct cursor-aided input/ 
edit feature plus automated internal /external 
file sorting and packing selections. Many 
other features. 
Price: $75.00 

Includes program disk and user's manual. 
Available: 

Electronic Information Systems, Inc. 

P.O. Box 5893 

Athens, GA 30604 

(404) 353-2858 



Name: PAL (Personal Aid to Learning) 

System: Apple II 
Memory: 48K 
Language: BASIC 
Hardware: One or two disk drives 
Description: PAL is the first diag- 
nostic/remediation program ever written 
for reading education. PAL covers the entire 
scope and sequence of reading education for 
each grade two through six. PAL actually 
diagnoses the cause of each reading prob- 
lem, then provides remediation directly 
targeted at those problems. 
Price: $99.95 for master disk package; 

$99.95 for each grade level package 

$9.95 for demo-disk package 
Author: Stanley Crane 

Dr. Dale Foreman 

Daniel Myers 
Available: 

Universal Systems for Education, Inc. 

2120 Academy Circle 

Suite E 

Colorado Springs, CO 80909 

(303) 574-4575 
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Name: 

System: 

Memory: 

Language: 



Client Records /Bill Preparation 
Order #0248AD-C10 

Apple II or Apple II Plus 

32K 

BASIC 
Hardware: One disk drive 
Description: Client Records /Bill Prepara- 
tion is designed to help lawyers, doctors, 
consultants, and other service business 
owners quickly and easily keep accurate 
records and prepare monthly bills. This pro- 
gram, which can be modified to suit an in- 
dividual business, allows the user to record 
client name, address, phone number, zip 
code, and four descriptive comments. The 
bill preparation function automatically 
totals up all charges that have been added to 
a client's file since the last billing and lists 
these charges, in detail, on the new invoice. 
Price: $49.95 
Author: D.C. Goodfellow 
Available: 
Instant Software 
Peterborough, NH 03458 



Name: 

System: 
Memory: 



Language: 
Hardware: 



XenoFile™ 

UCSD p-System 

48Kb runtime environment; 
64Kb development 
environment 
Written in UCSD Pascal 
8086, Z80, 8080, 8085, 6502, 
9900, 6809, 68000, 
LSI-11 /PDP-11 
Description: XenoFile allows you to access 
CP/M files and disks from UCSD p-System 
programs. Using XenoFile you can translate 
CP/M files to UCSD p-System files, as well 
as use CP/M program output as UCSD 
p-System input and vice versa. 
Price: $50.00 

Includes object code for XenoFile. 
Available: 
SofTech Microsystems, Inc. 
9494 Black Mountain Rd. 
San Diego, CA 92126 
(714) 578-6105 



Name: VIP II 

System: Apple II or Apple II Plus 
Memory: 32K 
Language: Applesoft 

Description: Prints VisiCalc formulas ex- 
actly as they appear in the model, in col- 
umns and rows. Provides hard copy of Visi- 
Calc formulas, automatically segmented 
and printed in blocks. Operates on any sym- 
metrical models up to 26 columns wide 
with any number of rows. Fast machine 
language read and sort. 
Price: $29.95 

Includes documentation booklet. 
Author: Mike Harvey 
Available: 

Micro-SPARC Systems Div. 

Dept. P, P.O. Box 325 

Lincoln, MA 01773 

(617) 259-9710 



What 

would you give 

to have 

TURTLEGRAPHICS, 

with 

automatic scaling, 

and 

four graphic 

modes, 

including 

HIRES and LORES, 

on your 

Apple II? 
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Software Catalog (continued) 



Name: VC-Plus 

System: Apple II 

Memory: 48K 

Language: Assembly 

Hardware: Legend 64KC and/ or 128KDE 

Cards 
Description: Add 82K or 145K of free 
memory space to VisiCorp's™ VisiCalc™ 
program by using the VC-Plus program with 
one (1) or two (2) Legend 64KC or 128KDE 
cards. The program comes on the 128KDE 
card's demo disk and is available for the 
64KC user. No language or other 16K card is 
required. 
Price: $34.95 

Includes disk and manual. 
Available: 

Legend Industries Ltd. 

2220 Scott Lake Road 

Pontiac, MI 48054 

(313) 674-0953 



Name: Eureka Learning System 

System: Apple II or Apple II Plus 
Memory: 48K 
Language: Applesoft in ROM 
Description: A courseware generator, en- 
abling the creation of CAI courses without 
any programming experience. The Eureka 
Learning System utilizes graphics, special 
characters, and sound to present lesson 
material to students. 
Price: $495.00 

Includes programs, character and graphic 

editors, tutorial manual, demonstration 

lessons. 
Author: EICONICS, Inc. 
Available: 

The Programmers, Inc. 

211 Cruz Alta Road 

P.O. Box 1207 

Taos, New Mexico 87571 

or local Eureka™ Learning System 

dealers 



Name: VersaForm 

System: Apple II and Apple III 

Memory: Apple II - 64K ; Apple III - 128K 

Language: Pascal-based 

Hardware: Two disk drives or hard disk 

plus one floppy disk 
Description: VersaForm is a Pascal-based 
business forms processor for Apple Systems 
with diskette/hard disk. A user-friendly in- 
teractive design facility aids form conver- 
sion or creation. A powerful set of auto-fill, 
data entry checking and calculation features 
are provided. Forms are stored and retrieved. 
Forms data may be printed as displayed or 
directed to specific print locations. Manage- 
ment reports may be prepared from speci- 
fied fields from selectively retrieved forms. 
Price: $389 - Apple II soft disk; $495 - hard 
disk; $495 - Apple III. 
Includes user guide, reference summary, 
tutorial package, program and tutorial 
diskettes. 
Available: 
Dealers throughout USA including some 
Computerlands and Distributors 



Name: BusiComp 

System: Apple II Plus or Apple with 

Integer Card 
Memory: 48K 
Language: BASIC 
Hardware: Capable of expansion to hard 

disk 
Description: Complete interactive business 
system including AR/AP/ inventory /fixed 
assets/general ledger/payroll. 
Price: $1500.00 

Includes program and documentation 
Available: 
Computer stores nationwide 

Name: TPS Canadian Payroll System 

System: Apple II or Apple II Plus 
Memory: 48K 
Language: Applesoft BASIC 
Description: The TPS Canadian Payroll 
System can be used throughout Canada ac- 
commodating up to 100 employees on two 
diskettes. Features include: costing, T4's, 
statements or cheques, UIC records of 
employment reporting, report generator, 
union maintenance and reporting. 
Price: $550.00 

Includes diskette and manual. 
Available: 

Time Proven Systems Inc. 

1210 Sheppard Ave. E. 

Suite 101 

Willowdale, Ontario, M2K 1E3 

or supporting Apple dealers 

Name: Planet Lander 

System: OSI C1P, C4P 

Memory: 4K 

Language: BASIC Machine 

Description: This is a simulation of a lunar 

lander landing on a planet's surface. You 

land the ship by controlling its velocity 

horizontally and vertically. Game points 

vary depending on which landing pad you 

elect. There are two levels of play: novice 

and expert. The controls are easy and make 

this Planet Lander fun to play. 

Price: $10.95 

Author: Thomas Andrew Paulson 

Available: 

Aurora Software Associates 

37 S. Mitchell 

Arlington Heights, IL 60005 

(312) 259-3150 

Name: The Illustrator 

System: Apple II 
Memory: 48K 

Language: 6502 Machine Language 
Hardware: Disk Drive 
Description: The Illustrator is a fully in- 
tegrated graphics package including 17 
billion possible color combinations, a 
pallette for mixing, image movement, fast 
color fill, hi-res brush sets, disk save, 
custom color menus and magnify feature. 
Price: $95.00 

Includes disk and manual. 
Author: Steve Dompier 
Available: 

Island Graphics 

Box V 

Bethel Island, CA 94511 



Name: A2-EDI Whole Brain Spelling 

System: Apple II Plus 
Memory: 48K 
Language: Applesoft 

Description: An educational software 
package designed to help the user develop 
internal visualization skills for improving 
spelling. As entertaining as it is educa- 
tionally sound. Utilizes the color graphic 
capabilities of the Apple II Computer to pro- 
vide positive user feedback, and is extremely 
user-friendly. 
Price: $34.95 

Includes 2,000 practice words, available 

in a variety of categories. 
Author: David Manton, Susan Campanini, 

and Joe Weintraub 
Available: 

Sublogic Communications Corporation 

713 Edgebrook Drive 

Champaign, IL 61820 



Name: Lemmings 

System: Apple II or Apple II Plus 

Memory: 48K RAM 

Language: Assembly 

Hardware: None required - compatible 

with Joyport 
Description: Challenging new computer 
game based on controlling a rapidly expand- 
ing population of lemmings. Armed only 
with your wits, your mission is to lock up a 
pair of non-breeding lemmings in every 
building in town. You are aided by a SPCA 
truck that will take lemmings to the clinic 
for neutering. Failure to control breeding 
causes a mass suicide jump in the sea, 
ending the game. 
Price: $24.95 

Includes complete instructions. 
Author: Dan Thompson 
Available: 

Sirius Software, Inc. 

10364 Rockingham Drive 

Sacramento, CA 95827 



Name: Mazerace 

System: Radio Shack Color Computer 
Memory: 16K 
Language: Extended BASIC 
Hardware: Joysticks 

Description: Mazerace is a fun board-type 
game that involves both chance and 
strategy. The playing field is an 18 x 18 hex- 
agon matrix that is partially filled with 
obstacles. Either one person against the 
computer or two people can play, with the 
computer or the players scrambling the 
playing field randomly to keep the action 
exciting. Mazerace uses high-resolution 
graphics. 
Price: $17.95 on cassette; $22.95 on disk 

Includes program and playing 

instructions. 
Author: Ross R. Humer 
Available: 

Computerware 

Box 668 

Encinitas, CA 92024 

(714) 436-3512 
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New Publications 

(continued from page 95) 

CONTENTS: Introduction: The Enemy Is 
Us; Overview: What Are the Issues? Tales of 
Horror; The Home Front: You and the Com- 
puter; Conspicuous Computing; Software 
Engineering; Human Engineering; Privacy 
and Security; Economics of Computing; 
Functional Specifications and Contracts; 
Managing the Machines; Getting Educated; 
Funding Computing; What Is, What Ain't, 
What Will Be ; Index. 

Microprocessor Applications Hand- 
book, by David F. Stout. McGraw-Hill 
Book Company (New York, NY), 1982, 
472 pages, 284 illustrations, 6H x 9Va 
inches, hardcover. 
ISBN 0-07-061798-8 $35.00 

This book is addressed to individuals 
who design — or would like to design 
— intelligent systems. A wide variety 
of microprocessor applications are 
presented, based on contributions from 
specialists in many diversified fields. 
Most chapters contain both hardware 
and software aspects of microprocessor 
system design and discuss specific 
design information gathered during the 
development of actual microprocessor 
applications. 

CONTENTS: Survey of Microprocessor 
Technology; A Microprocessor-Based Inter- 
face for the IEEE-488 Bus; Hamming Code 
Error Correction for Microcomputers^ 
Microprocessor-Controlled Color TV 
Receiver; Microcomputer Data Acquisition 
Module; A Microprocessor-Controlled 
Lumber Grader; Programmable Video 
Games; Microprocessor — A/D Converter 
Interfaces; Microcomputer Applications In 
Telephony; A 32-Channel Digital Wave- 
form Synthesizer; Digital Filters Utilizing 
Microprocessors; Parallel and Serial Micro- 
processor Data Interfaces; Keyboard Data 
Input Techniques; Voice Recognition; A 
Slow-Scan Television System Using a 
Microprocessor; Hardware-Oriented State- 
Description Techniques; Multiple Micro- 
computers in Small Systems. 







2111 W. Crescent, Sta. G 
Anaheim, CA 92801 



What 

would you give 

to develop programs 

for die 

IBM PC, 

TRS 80 Model II, 

T.I. 99/4 

Home Computer, 

and Xerox 820 

on your 

Apple II? 
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Software Catalog (continued) 



Name: VC-PIus 

System: Apple II 

Memory: 48K 

Language: Assembly 

Hardware: Legend 64KC and/ or 128KDE 

Cards 
Description: Add 82K or 145K of free 
memory space to VisiCorp's™ VisiCalc™ 
program by using the VC-Plus program with 
one (1) or two (2) Legend 64KC or 128KDE 
cards. The program comes on the 128KDE 
card's demo disk and is available for the 
64KC user. No language or other 16K card is 
required. 
Price: $34.95 

Includes disk and manual. 
Available: 

Legend Industries Ltd. 

2220 Scott Lake Road 

Pontiac, MI 48054 

(313) 674-0953 



Name: Eureka Learning System 

System: Apple II or Apple II Plus 
Memory: 48K 
Language: Applesoft in ROM 
Description: A courseware generator, en- 
abling the creation of CAI courses without 
any programming experience. The Eureka 
Learning System utilizes graphics, special 
characters, and sound to present lesson 
material to students. 
Price: $495.00 

Includes programs, character and graphic 

editors, tutorial manual, demonstration 

lessons. 
Author: EICONICS, Inc. 
Available: 

The Programmers, Inc. 

211 Cruz Alta Road 

P.O. Box 1207 

Taos, New Mexico 87571 

or local Eureka™ Learning System 

dealers 

Name: VersaForm 

System: Apple II and Apple III 

Memory: Apple II - 64K ; Apple III - 128K 

Language: Pascal-based 

Hardware: Two disk drives or hard disk 

plus one floppy disk 
Description: VersaForm is a Pascal-based 
business forms processor for Apple Systems 
with diskette/hard disk. A user-friendly in- 
teractive design facility aids form conver- 
sion or creation. A powerful set of auto-fill, 
data entry checking and calculation features 
are provided. Forms are stored and retrieved. 
Forms data may be printed as displayed or 
directed to specific print locations. Manage- 
ment reports may be prepared from speci- 
fied fields from selectively retrieved forms. 
Price: $389 - Apple II soft disk; $495 - hard 
disk; $495 - Apple III. 
Includes user guide, reference summary, 
tutorial package, program and tutorial 
diskettes. 
Available: 
Dealers throughout USA including some 
Computerlands and Distributors 
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Name: BusiComp 

System: Apple II Plus or Apple with 

Integer Card 
Memory: 48K 
Language: BASIC 
Hardware: Capable of expansion to hard 

disk 
Description: Complete interactive business 
system including AR/AP/inventory/fixed 
assets/general ledger/payroll. 
Price: $1500.00 

Includes program and documentation 
Available: 

Computer stores nationwide 

Name: TPS Canadian Payroll System 

System: Apple II or Apple II Plus 
Memory: 48K 
Language: Applesoft BASIC 
Description: The TPS Canadian Payroll 
System can be used throughout Canada ac- 
commodating up to 100 employees on two 
diskettes. Features include: costing, T4's, 
statements or cheques, UIC records of 
employment reporting, report generator, 
union maintenance and reporting. 
Price: $550.00 

Includes diskette and manual. 
Available: 

Time Proven Systems Inc. 

1210 Sheppard Ave. E. 

Suite 101 

Willowdale, Ontario, M2K 1E3 

or supporting Apple dealers 

Name: Planet Landet 

System: OSI C1P, C4P 

Memory: 4K 

Language: BASIC Machine 

Description: This is a simulation of a lunar 

lander landing on a planet's surface. You 

land the ship by controlling its velocity 

horizontally and vertically. Game points 

vary depending on which landing pad you 

elect. There are two levels of play: novice 

and expert. The controls are easy and make 

this Planet Lander fun to play. 

Price: $10.95 

Author: Thomas Andrew Paulson 

Available: 

Aurora Software Associates 

37 S. Mitchell 

Arlington Heights, IL 60005 

(312) 259-3150 



Name: The Illustrator 

System: Apple II 
Memory: 48K 

Language: 6502 Machine Language 
Hardware: Disk Drive 
Description: The Illustrator is a fully in- 
tegrated graphics package including 17 
billion possible color combinations, a 
pallette for mixing, image movement, fast 
color fill, hi-res brush sets, disk save, 
custom color menus and magnify feature. 
Price: $95.00 

Includes disk and manual. 
Author: Steve Dompier 
Available: 

Island Graphics 

Box V 

Bethel Island, CA 94511 



Name: A2-EDI Whole Brain Spelling 

System: Apple II Plus 
Memory: 48K 
Language:" Applesoft 

Description: An educational software 
package designed to help the user develop 
internal visualization skills for improving 
spelling. As entertaining as it is educa- 
tionally sound. Utilizes the color graphic 
capabilities of the Apple II Computer to pro- 
vide positive user feedback, and is extremely 
user-friendly. 
Price: $34.95 

Includes 2,000 practice words, available 

in a variety of categories. 
Author: David Manton, Susan Campanini, 

and Joe Weintraub 
Available: 

Sublogic Communications Corporation 

713 Edgebrook Drive 

Champaign, IL 61820 



N am e : Lemmings 

System: Apple II or Apple II Plus 

Memory: 48K RAM 

Language: Assembly 

Hardware: None required - compatible 

with Joyport 
Description: Challenging new computer 
game based on controlling a rapidly expand- 
ing population of lemmings. Armed only 
with your wits, your mission is to lock up a 
pair of non-breeding lemmings in every 
building in town. You are aided by a SPCA 
truck that will take lemmings to the clinic 
for neutering. Failure to control breeding 
causes a mass suicide jump in the sea, 
ending the game. 
Price: $24.95 

Includes complete instructions. 
Author: Dan Thompson 
Available: 

Sirius Software, Inc. 

10364 Rockingham Drive 

Sacramento, CA 95827 



Name: Mazerace 

System: Radio Shack Color Computer 
Memory: 16K 
Language: Extended BASIC 
Hardware: Joysticks 

Description: Mazerace is a fun board-type 
game that involves both chance and 
strategy. The playing field is an 18x18 hex- 
agon matrix that is partially filled with 
obstacles. Either one person against the 
computer or two people can play, with the 
computer or the players scrambling the 
playing field randomly to keep the action 
exciting. Mazerace uses high-resolution 
graphics. 
Price: $17.95 on cassette; $22.95 on disk 

Includes program and playing 

instructions. 
Author: Ross R. Humer 
Available: 

Computerware 

Box 668 

Encinitas, CA 92024 

(714) 436-3512 
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New Publications 

(continued from page 95) 

CONTENTS: Introduction: The Enemy Is 
Us; Overview: What Are the Issues? Tales of 
Horror; The Home Front: You and the Com- 
puter; Conspicuous Computing; Software 
Engineering; Human Engineering; Privacy 
and Security; Economics of Computing; 
Functional Specifications and Contracts; 
Managing the Machines; Getting Educated; 
Funding Computing; What Is, What Ain't, 
What Will Be; Index. 

Microprocessor Applications Hand- 
book, by David F. Stout. McGraw-Hill 
Book Company (New York, NY), 1982, 
472 pages, 284 illustrations, 6M x 914 
inches, hardcover. 
ISBN 0-07-061 798-8 $35.00 

This book is addressed to individuals 
who design — or would like to design 
— intelligent systems. A wide variety 
of microprocessor applications are 
presented, based on contributions from 
specialists in many diversified fields. 
Most chapters contain both hardware 
and software aspects of microprocessor 
system design and discuss specific 
design information gathered during the 
development of actual microprocessor 
applications. 

CONTENTS: Survey of Microprocessor 
Technology; A Microprocessor-Based Inter- 
face for the IEEE-488 Bus; Hamming Code 
Error Correction for Microcomputers; A 
Microprocessor-Controlled Color TV 
Receiver; Microcomputer Data Acquisition 
Module; A Microprocessor-Controlled 
Lumber Grader; Programmable Video 
Games; Microprocessor — A/D Converter 
Interfaces; Microcomputer Applications In 
Telephony; A 32-Channel Digital Wave- 
form Synthesizer; Digital Filters Utilizing 
Microprocessors; Parallel and Serial Micro- 
processor Data Interfaces; Keyboard Data 
Input Techniques; Voice Recognition; A 
Slow-Scan Television System Using a 
Microprocessor; Hardware-Oriented State- 
Description Techniques; Multiple Micro- 
computers in Small Systems. 

/MCftO 



(Continued from page 51) 

. i j„. :ui.. ,:• l„ ..~ ~,,,l; 




What 

would you give 

to develop programs 

for die 

IBM PC, 

TRS 80 Model II, 

T.I. 99/4 

Home Computer, 

and Xerox 820 

on your 

Apple II? 
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AIM 6809??? 

UpqRAde Your AIM 65* 
to 6809 CPU Power wi T h "MACH-9"! 

STANdARd: *6809 CPU & Plug-in Assembly 
*Super-set of AIM Monitor 
*Two-Pass Symbolic Assembler 
*Complete Monitor Documentation & Source 

HOBBYIST ANd INDUSTRIAL Versions 
AvAiUbLE Now: 

HOBBYIST includes hardware as a kit using AIM ROM 
sockets $199.00 (add $2 for shipping and handling). 

INDUSTRIAL is preassembled and pretested with local 
BUS, 5 locking low force ROM sockets and 2K Static RAM 
$279.00 (add $2 for shipping and handling). 

iMMEdiATE Future: 

*STC FORTH System with Virtual Disk 
*A Fantastic Pascal System 

M.M.S. Inc. 

1110 E. PENNSylvANIA St. 

Tucson, AZ 85714 
(602) 746-0418 



AZ residents include 4% sates tax *A trademark of Rockwell Inc. 
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INTRODUCING! 



iyitim-bB 



For you, the 68XX user! An exciting new monthly 

magazine formatted for the 68XX enthusiast 

specializing in hardware applications. 

REGULAR FEATURES WILL INCLUDE: 

■ Articles on 6800, 6809, and 68000 

■ Construction Articles 

• New Product Announcements 

■ Product Reviews 

■ Classified Ads 

■ "2-Bits" 

• Questions & Answers 



ADVERTISERS WELCOME! 
CASH COMPENSATION FOR ARTICLES 
YEARLY SUBSCRIPTIONS AVAILABLE 
1 Year $24.00 2 Years $45.00 

Single Issue $2.95 

CALL NOW FOR YOUR SUBSCRIPTION! 

P. O. BOX 310 

CONYERS, GEORGIA 30207 

404-929-0606 

MASTER CHARGE, VISA, and AMERICAN EXPRESS ACCEPTED 



SOUTHEASTERN MICRO SYSTEMS, INC. 

1080 IRIS DRIVE 

CONYERS, GEORGIA 30207 

404-922-1620 

SX-9 
Single Board System 

■ Uses 6809 CPU 

■ Two RS232 Serial Ports 

■ Two Parallel 8 Bit Ports 

■ One High-Speed Serial Port 

■ System Clock at 1.22 MHZ. Fixed 

■ System provides for selectable diagnostics on power up or by 

command 

■ Provides tor automatic disk boot on power up 

■ Provides for board ID for future multi-user configuration or user 

defined 
- Expansion capabilities via ribbon cable 

■ Disk controller provides control for up to four 5 1/4* drives from 

SS/SD up to DS/DD control 

■ Real time clock 

■ Memory 64K RAM (62K User Memory) 

■ All signals via plug in ribbon connectors 

■ Compatible with TSC FLEX 9 and all TSC 6809 single user software. 

DS/DD requires SEMS-1 Disk Drivers 

■ Board size: 10.25* by 10.5" 

• Power requirements: t5 VDC at 3 AMPS, r12 VDC at 250 ma, 
-12 VDC at 100 ma 

■ Optional Cabinet with Power Supply 



LIMITED OFFER 

Bare Board With SEMS-1 
Monitor & Documentation 



ONLY 100 Bare Boards 

Will Be Soldi 

ORDER NOW! 

First order basis 



PRICES 

ASSEMBLED & TESTED 



BOARD WITH CABINET $1295 00 

& POWER SUPPLY 



SOFTWARE: TSC FLEX 9 
With SEMS Disk Drivers 
(with Editor & Assembler) 



US SHIPPING $10.00, FOREIGN SHIPPING $50.00 
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If you're currently %/ 
using Apple Pascal* on your 
Apple II, you're probably aware 
of some noticeable limitations. 
And you'd probably give a lot for 
an upgrade package, including 
the UCSD p-System* UCSD Pascal 
and TURTLEGRAPHICS, that would get 
your Apple* to do what it's capable of. 

Upgrade to the UCSD p- System 
Version IV from SofTech Microsystems. 
It's got all the features of Apple Pascal, 
and then some. For instance, Apple Pascal's 
UNITS must be linked in at each compilation, 
the p- System's do not. And instead of being lim- 
ited to 32 UNITS, like Apple Pascal, the p-System 
allows a virtually unlimited number. 

How about peripheral support? The p- System 
supports all the peripherals that 
Apple Pascal does, plus a clock, 
and a lower case adapter. And, 
we get more out of the periph 
erals you've already got— 
shiftware modification on the 
keyboard, alpha lock key 
typeahead and characters 
not even on the Apple 
keyboard. 

And when it 
comes to graphics, our 
TURTLEGRAPHICS 
has everything in Apple's 
graphics, plus automatic 
scaling and four graphic modes, 
including both HIRES and LORES 

Then there's portability. The 
p- System lets you develop gen- 
uinely portable, high-level applications for nearly 
any microcomputer around. It allows you to work in 
any combination of UCSD Pascal and BASIC 



(available as an add-on). 
And it provides support for 
dynamic memory man- 
agement and multitask- 
ing, with a full arsenal 
of enhancements. And if 
that isn't enough, your 
existing Apple Pascal 
programs are upward 
compatible with the 
p- System, and simply 
have to be recompiled 
to execute. All your Apple 
II needs is 64K of RAM 
and two disk drives. 

Last but not least, there's 
n the price. Normally you'd have 
to pay as much as $825 for such 
a package. 

But, for the next two months, 
we're making this special upgrade 
offer to Apple Pascal users for a 
mere $295. That's a savings of 
over 60%. 

So just send in the coupon 
below, with your proof of pur- 
chase and check, money order 
or Visa or MasterCard num- 
ber, and you'll be on your way 
to getting more out of your 
Apple II than you ever dreamed 
of. But youd better hurry. 
Your two months have already 
started. 
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Okay, SofTech Microsystems, here's my $295. 1 want 

my Apple II to have software it can really appreciate. 
My check is enclosed □ 
Please charge to my Acct. # 



Please send coupon to: Apple Upgrade Dept 
P.O. Box 27179, San Diego, CA 92128 
Or call (714) 578-6995 



Visa □ Master Charge □ Expiration Date 

I hereby certify that I am an Apple Pascal Owner. 

Signature 

Name 

Company. 

Address 



Name on card. 



My proof of purchase is 
_□ invoice □ receipt □ disk label □ other 



Title 
„Telephone_ 



Ext. 



City_ 



State. 



Zip 



o=a 
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OFFER VALID JULY 1 to AUGUST 31, 1982 

(California residents please add 6% sales tax [California Transit District -6.5%] Massachusetts residents please add 5% sales tax.) 

UCSD p-System and UCSD Pascal are trademarks of the Regents of the University of California. Apple, Apple II, and Apple Pascal are registered trademarks of Apple Computer, r — 
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FORTH 

Lisp 
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8086/8088 
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• machine independent programs 
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Yes ! Please enter my subscription for ^4 

□ 1 yr. (12 issues) $25 □ 2 yrs. $47 (save $13 off newsstand) 

□ Please bill me D I enclose check /money order 

Name _____ 

Address 

City 



. State. 



.Zip, 



Are you ready? 

DDJ, the world's foremost micro- 
computer publication, has been work- 
ing for years to prepare its readers to 
be innovators, to lead the wave of 
breakthroughs in our changing tech- 
nology. 

Every issue of Dr. Dobb's Journal 
helps one to understand the nuts and 
bolts of small computer systems. We 
offer entire listings of valuable soft- 
ware: our pages have included com- 
pilers," cross-assemblers, editors, new 
languages, hardware interfaces and 
more — usually before anyone else 
thinks of them! 

Even more 
important! 

As valuable and significant as all 
those things are, there is an even great- 
er reason for you to join forces with 
DDJ. That is the keen, responsive 
readership. Our subscribers share in- 
sights, correspond, and contribute to 
one another's work, more than any 
other group we know. They treat 
Dr. Dobb's Journal as a "hands-on" 
publication. 

This warm cooperation has done 
more to refine software products, and 
generally to advance the state of 
microcomputer technology, than per- 
haps any other resource. And it is 
available to you through our pages! 

For the straight 
Facts . . . 

If you are a serious computing 
professional or enthusiast, then you 
should take a very close look at what 
DDJ offers you. We've been on the 
cutting edge since 1976. 
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Dr. Dobb's Journal • A Publication of People's Computer Company, 1263 El Camino Real, P.O. Box E, Menlo Park, CA 94025 



QUALITY SOFTWARE FOR TRS-80 COLOR AND OSI 




QUEST - A NEW IDEA IN ADVEN- 
TURE GAMES! Different from all the 
others. Quest is played on a computer 
generated map of Alesia. Your job is to 
gather men and supplies by combat, bargain- 
ing, exploration of ruins and temples and 
outright banditry. When your force is strong 
enough, you attack the Citadel of Moorlock 
in a life or death battle to the finish. Play- 
able in 2 to 5 hours, this one is different 
every time. 

16K COLOR-80 OR TRS-80 or 12KOSI. 
$14.95 



BASIC THAT ZOOOMMSM 
AT LAST AN AFFORDABLE COMPILER 
FOR OSI AND TRS-80 COLOR MA 
CHINES!!! The compiler allows you to 
write your programs in easy BASIC and 
then automatically generates a machine 
code equivalent that runs 50 to 150 times 
faster. 

It does have some limitations. It takes at 
least 8K of RAM to run the compiler and it 
does only support a subset of BASIC— about 
20 commands including FOR, NEXT, END, 
GOSUB, GOTO, RETURN, END, PRINT, 
STOP, USR(X), PEEK, POKE, *,/, + ,-, 
X , X , = , VARIABLE NAMES A-Z, A 
SUBSCRIPTED VARIABLE, and INTE- 
GER NUMBERS FROM - 64K. 
TINY COMPILER is written in BASIC. It 
generates native, relocatable 6502 or 6809 
code. It comes with a 20 page manual and 
can be modified or augmented by the user. 
$24.95 on tape or disk for OSI or TRS-80 
Color. 







LABYRINTH - 16K EXTENDED COLOR 
BASIC — With amazing 3D graphics, you 
fight your way through a maze facing real 
time monsters. The graphics are real enough 
to cause claustrophobia. The most realistic 
game that I have ever seen on either system. 
$14.95. (8Kon OSI) 
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AARDVARK - 80 
2352 S. Commerce, Walled Lake, Ml 48088 
TRS 80 COLOR (31 3) 669-31 1 
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VENTURER!-A fast action all machine 
code Arcade game that feels like an adven- 
ture. Go berserk as you sneak past the 
DREADED HALL MONSTERS to gather 
treasure in room after room, killing the 
NASTIES as you go. Great color, high res 
graphics, sound and Joystick game for the 
TRS-80 Color or OSI machines, (black 
and white and silent on OSI.) Tape only. 
$19.95. 
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SCREEN 




MIXER 



SCREEN MIXER is a set of three modules for APPLE -IL 
Just plug-in these modules to your Apple -II, and you will 
have the Apple -II with more features you could not expect 
till now 

SCREEN MIXER provides: 

•The mixed screen of any two of screens available for the 
Apple -II. Please note that all of HGR, LGR and Text screen 
has two pages. The mixing is done with hardware, not like 
Hi-Res Text Generater Programs, thus you need no software 
and the scroll speed is not reduced. Also, you can scroll 
the text without any effect to the graphic patterns. 

• The Double Density High Resolution Graphics. Yes, you 
can plot 580 dots in one line. You have only 280 dots in one 
line on ordinary Apple -II. (Software is required) 

• One of the most advanced character display. Besides 
Normal and Inverse characters which are already built-in 
you will have the choice of Half-Intensity and Hilighted cha- 
racters. And more, you may Over-Write or Over-Type any 
character to other character if you want to do so! 

(Software is included) 

$60 MANUAL — $10.00, applied towards purchase. 




Over Write 



cosmos 



WORLD WlOt COMPUTIR SUPfR S 



Dealers inquiries invited. 

For more information call or write to ASTAR INTERNATIONAL CO. 

5676 FRANCIS AVE., CHINO, CA 91710 Phone 714-627-9887 



Apple-II is a registered trademark of Apple Computer Inc. 



A feast 
of computing ideas. 



If you work with a 6502/6809-based 
system, you're probably hungry for the 
facts and ideas that will help you 
understand the inner workings of your 
computer. You want to go beyond 
canned software — use your computer 
for more than games — learn the 
advanced programming techniques 
that enable you to get the most out of 
your 6502/6809 system. 

MICRO, The 6502/6809 Journal, 
gives you page after page, month after 
month, of solid information to sink 
your teeth into. MICRO is the premier 
how-to magazine for serious users of 
the Apple, PET/CBM, OSI, Atari, AIM, 
SYM, KIM, and all 6809 based systems 
including the TRS-80 Color Computer. 
It's a resource journal internationally 
respected by professionals in business, 
industry, and education. Every issue of 
MICRO keeps you informed with up-to- 
the-minute data on new products 
and publications: 

• hardware catalog with organized, 
concise description 

• software catalog in an easy-to- 
use format 

• new publications listed and 
annotated 

• reviews and evaluations of sig- 
nificant products 

And there's much more: 

• In-depth hardware tutorials 
bring expert advice into your home or 
office. 

• Detailed discussions of pro- 
gramming languages deepen and 
broaden your programming ability. 

• Complete program listings 
enable you to increase your machine's 
capabilities. 

• Bibliography of 6502/6809 
information helps you to find pertinent 
articles in a timely manner. 

• Special monthly features with 
in-depth treatment of one subject or 




Special PET/VIC Feature 
A Look a t the TBS-80 C olor Computer 



Step Up t o P rogra 



You'll love 
every byte. 



YES! I want to get more from 
my microcomputer. Please send me 



_/year. 



_year(s)ofMICROat$ 

(Outside U.S. and Canada, please 

indicate via □ surface or □ air mail.) 



Company 



City State Zip Code 

□ Check enclosed for $ 

D Charge my credit card account 
□ VISA □ MasterCard 



system increase your knowledge of the 
field. 

• Balanced mix of machine- 
specific and general articles for your 

everyday use as well as long-range 
reference needs. 

• Informative advertising 

focused specifically on 6502/6809 
machines keeps you abreast of latest 
developments. 

• Reader feedback puts you in 
touch with other micro-computerists. 

MICRO is the magazine you need to 
get the most from your own 6502/6809 
system! 

To order, send your check or interna- 
tional money order (payable to MICRO) 
and the order form at left, to: 

Subscription Fulfillment 

MICRO, Dept. Ml 

34 Chelmsford Street 

P.O. Box 6502 

Chelmsford, MA 01824 

Or, for your convenience, call our 
toll-free number: 

1-800-345-8112 

(In Pennsylvania, 1-800-662-2444) 

and charge your subscription to your 
MasterCard or VISA. (All orders must be 
prepaid in U.S. dollars or charged to 
your MasterCard or VISA.) 

SUBSCRIPTION RATES (U.S. dollars) 
Yearly subscription {ISSN 027-9002) 
saves 20% off the single-issue price. 
U.S. $24* 
Canada $27 

Europe $27 ($42 by air mail) 
Mexico, Central America, Mideast, - 
North and Central Africa $27 ($48 air) 
South America, Far East, South Africa, 
Australasia $27 ($72 air) 
* SPECIAL OFFER— U.S. ONLY: 
Save even more— 30% off single- issue 
price: 2 years, $42 






Signature 

Card number 
Exoiration date 
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Apple II and Apple II Plus 

6502-Based Microcomputer 

Available in 16K, 20K, 24K, 32K, 36K, 48K and 64K (with 
Language Card) configurations. 

Apple II comes standard with Integer BASIC 
Apple II Plus comes standard with Applesoft BASIC 

There are eight expansion slots for use with peripheral 

devices. 

Additional CPU boards are available to run the 6809, the 

Z80, and the 8088. 

Although the Apple II was designed about five years ago, 
it remains one of the fastest-selling models on the market 
today. The Apple II has proven itself to be a reliable and 
extremely flexible unit. The Apple It enjoys an envious 
position of having the largest software base of any com- 
puter on the market today. 



LOCATION 
DECIMAL HEX 



0-255 
256-511 
512-767 
768-975 
976-1023 
1024-2047 
2048-LOMEM 
2048-3071 
3072-8191 
8192-16383 
16384-24575 
24576-38399 
38400-49151 
49152-53247 
53248-57343 
57344-63487 
63488-65535 



$0-$FF 
$100-$1FF 
$200-$2FF 
$300-$3CF 
$3D0-$3FF 
$400-$7FF 
$800-LOMEM 
$800-$BFF 
$C00-$1FFF 
$2000-$3FFF 
$4000-$5FFF 
$6000-$95FF 
$9600-$ BFFF 
$C00O-$CFFF 
$DO0O-$DFFF 
$E000-$F7FF 
$F800-$FFFF 



USAGE 



Zero-page system storage 

System stack 

Keyboard character buffer 

Often available as free space for user programs 

System vectors 

Text and lo-res graphics page 1 

Program storage 

Text and lo-res graphics page 2 or free space 

Free space unless RAM Applesoft is in use 

Hi-res page 1 or free space 

Hi-res page 2 or free space 

Free space and string storage 

DOS 

I/O, hardware (reserved) 

Applesoft in Language Card or ROM 

Applesoft or Integer BASIC in Language Card or ROM 

System monitor 



fP 



Handy PEEKs, POKEs and CALLs 

(E = PEEK, 0= POKE, C = CALL) 





LOCATION 






DECIMAL 


HEX 


USAGE 


32 




$20 


Left column of text window 


33 




$21 


Width of text window 


34 




$22 


Top of text window 


35 




$23 


Bottom of text window 


36 




$24 


Cursor's horizontal position 


37 




$25 


Cursor's vertical position 


50 




$32 


Video inverse/normat/f lashing control 











216 



$D8 



218-219 


$DA-$DB 


222 


$OE 


1013-1015 


$3F5-$3F7 


49152 (- 


16384) 


$C0O0 


49168 (- 


16368) 


$C010 


49184 (- 


16352) 


$C020 


49200 ■■{,- 


16336) 


$C030 


49232 ( - 


16304) 


$C050 


49233 (■- 


16303) 


$C051 


49234 (- 


16302) 


$C052 


49235 {- 


16301) 


$C053 


49236 (- 


16300) 


$C054 


49237 (- 


-16299) 


$C055 


49238 (- 


-16298) 


$C056 


49239 (- 


-16297) 


$C057 


49240 (- 


-16296) 


$C058 


49241 (- 


-16295) 


$C059 


49242 (- 


-16294) 


$C05A 


49243 (- 


-16293) 


$C05B 


49244 (- 


-16292) 


$C05C 


49245 (- 


-16291) 


$C05D 


49246 (- 


-16290) 


$C05E 


49247 {- 


-16289) 


$C05F 


49248 <- 


-16288) 


$CQ60 


49249 (- 


-16287) 


$C061 


49250 <- 


-16286) 


$C062 


49251 (- 


-16285) 


$C063 


49252 (- 


-16284) 


$C064 


49253 (- 


-16283) 


$C065 


49254 (- 


-16282) 


$C066 


49255 ■(- 


-16281) 


$C067 


63538 ( 


- 1 998) 


$F832 


63542 ( 


-1994) 


$F836 


64473 ( 


-1063) 


$FBD9 


64578 ( 


-958) 


. SFC42 


64600 ( 


- 936) 


$FC58 


64614 { 


-922) 


$FC66 


64668 < 


-868) 


$FC9C 



> 127 If ON ERR GOTO active 

Applesoft line # where error occurred 

Error code (0,16-255 see Applesoft BP.R.M., page #81) 

(1-15 See DOS Manual page #114) 

Applesoft's Ampersand Vector Address. Holds JMP instruction to 

subroutine which handles & command. 

Keyboard input. If > 127 key has been pressed since last 

strobed (valid value). 

Keyboard strobe. Access this location to set high order bit 

of $C000 to zero. 

Toggle cassette output 

Toggle speaker 

Set from text to graphics mode 

Set from graphics to text mode 

Reset to full screen graphics 

Set to mixed text/graphics 

Display page 1 

Display page 2 

Set to lo-res or text 

Set to hi- res 

Turn annunciator off 

Turn annunciator on 

Turn annunciator 1 off 

Turn annunciator ton 

Turn annunciator 2 off 

Turn annunciator 2 on 

Turn annunciator 3 off 

Turn annunciator 3 on 

Cassette input. > 127 = binary '1, < 128 = binary 0. 

Read pushbutton 0. > 127 = pushbutton pressed. 

Read pushbutton 1. > 127 = pushbutton pressed 

Read pushbutton 2: > 127 = pushbutton pressed. 

Read game paddle 

Read game paddle 1 

Read game paddle 2 

Read game paddle 3 

Clear lo-res screen 

Clear lo-res screen (top 40 Sines) 

Send a BELL character to current output device 

Clear text window from present cursor position to lower right 

of screen 

Clear entire screen and move the cursor to upper lefthand corner 

Move cursor down one line (no.change horizontally) 

Clear. text to end of line: ,-• .; ... ' .... . 



COMMAND(S) 

E,0 
E,0 
E,0 
E,0 
E,0 
E,0 
E,0 



E.O 
E 



E 
E 
O 

6 
o 
o 
o 
o 



o 
o 
o 
o 
o 



o 
o 
o 

E 
E 
E 
E 
E 
E 
E 
E 
C 
C 

c 
c 

c 
c 
c 



VALUES 

0-39 

1-40 

0-24 

0-24 

0-39 

0-23 
255 = normal 
127 = flashing 
63 = inverse 
= inactive 
> 127 = active 



■$4C f .$LO, $HI 
Negative ASCI! 



0-255 
0-255 
0-255 
0-255 
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Data Sheet #6 
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Apple II and Apple II Plus 

6502-Based Microcomputer 

Available in 16K, 20K, 24K, 32K, 36K, 48K and 64K (with 
Language Card) configurations. 

Apple II comes standard with Integer BASIC 
Apple II Plus comes standard with Applesoft BASIC 

There are eight expansion slots for use with peripheral 

devices. 

Additional CPU boards are available to run the 6809, the 

Z80, and the 8088. 

Although the Apple II was designed about five years ago, 
it remains one of the fastest-selling models on the market 
today. The Apple II has proven itself to be a reliable and 
extremely flexible unit. The Apple It enjoys an envious 
position of having the largest software base of any com- 
puter on the market today. 



LOCATION 
DECIMAL HEX 



0-255 
256-511 
512-767 
768-975 
976-1023 
1024-2047 
2048-LOMEM 
2048-3071 
3072-8191 
8192-16383 
16384-24575 
24576-38399 
38400-49151 
49152-53247 
53248-57343 
57344-63487 
63488-65535 



$0-$FF 
$100-$1FF 
$200-$2FF 
$300-$3CF 
$3D0-$3FF 
$400-$7FF 
$800-LOMEM 
$800-$BFF 
$C00-$1FFF 
$2000-$3FFF 
$4000-$5FFF 
$6000-$95FF 
$9600-$ BFFF 
$C00O-$CFFF 
$DO0O-$DFFF 
$E000-$F7FF 
$F800-$FFFF 



USAGE 



Zero-page system storage 

System stack 

Keyboard character buffer 

Often available as free space for user programs 

System vectors 

Text and lo-res graphics page 1 

Program storage 

Text and lo-res graphics page 2 or free space 

Free space unless RAM Applesoft is in use 

Hi-res page 1 or free space 

Hi-res page 2 or free space 

Free space and string storage 

DOS 

I/O, hardware (reserved) 

Applesoft in Language Card or ROM 

Applesoft or Integer BASIC in Language Card or ROM 

System monitor 



fP 



Handy PEEKs, POKEs and CALLs 

(E = PEEK, 0= POKE, C = CALL) 





LOCATION 






DECIMAL 


HEX 


USAGE 


32 




$20 


Left column of text window 


33 




$21 


Width of text window 


34 




$22 


Top of text window 


35 




$23 


Bottom of text window 


36 




$24 


Cursor's horizontal position 


37 




$25 


Cursor's vertical position 


50 




$32 


Video inverse/normat/f lashing control 











216 



$D8 



218-219 


$DA-$DB 


222 


$OE 


1013-1015 


$3F5-$3F7 


49152 (- 


16384) 


$C0O0 


49168 (- 


16368) 


$C010 


49184 (- 


16352) 


$C020 


49200 ■■{,- 


16336) 


$C030 


49232 ( - 


16304) 


$C050 


49233 (■- 


16303) 


$C051 


49234 (- 


16302) 


$C052 


49235 {- 


16301) 


$C053 


49236 (- 


16300) 


$C054 


49237 (- 


-16299) 


$C055 


49238 (- 


-16298) 


$C056 


49239 (- 


-16297) 


$C057 


49240 (- 


-16296) 


$C058 


49241 (- 


-16295) 


$C059 


49242 (- 


-16294) 


$C05A 


49243 (- 


-16293) 


$C05B 


49244 (- 


-16292) 


$C05C 


49245 (- 


-16291) 


$C05D 


49246 (- 


-16290) 


$C05E 


49247 {- 


-16289) 


$C05F 


49248 <- 


-16288) 


$CQ60 


49249 (- 


-16287) 


$C061 


49250 <- 


-16286) 


$C062 


49251 (- 


-16285) 


$C063 


49252 (- 


-16284) 


$C064 


49253 (- 


-16283) 


$C065 


49254 (- 


-16282) 


$C066 


49255 ■(- 


-16281) 


$C067 


63538 ( 


- 1 998) 


$F832 


63542 ( 


-1994) 


$F836 


64473 ( 


-1063) 


$FBD9 


64578 ( 


-958) 


. SFC42 


64600 ( 


- 936) 


$FC58 


64614 { 


-922) 


$FC66 


64668 < 


-868) 


$FC9C 



> 127 If ON ERR GOTO active 

Applesoft line # where error occurred 

Error code (0,16-255 see Applesoft BP.R.M., page #81) 

(1-15 See DOS Manual page #114) 

Applesoft's Ampersand Vector Address. Holds JMP instruction to 

subroutine which handles & command. 

Keyboard input. If > 127 key has been pressed since last 

strobed (valid value). 

Keyboard strobe. Access this location to set high order bit 

of $C000 to zero. 

Toggle cassette output 

Toggle speaker 

Set from text to graphics mode 

Set from graphics to text mode 

Reset to full screen graphics 

Set to mixed text/graphics 

Display page 1 

Display page 2 

Set to lo-res or text 

Set to hi- res 

Turn annunciator off 

Turn annunciator on 

Turn annunciator 1 off 

Turn annunciator ton 

Turn annunciator 2 off 

Turn annunciator 2 on 

Turn annunciator 3 off 

Turn annunciator 3 on 

Cassette input. > 127 = binary '1, < 128 = binary 0. 

Read pushbutton 0. > 127 = pushbutton pressed. 

Read pushbutton 1. > 127 = pushbutton pressed 

Read pushbutton 2: > 127 = pushbutton pressed. 

Read game paddle 

Read game paddle 1 

Read game paddle 2 

Read game paddle 3 

Clear lo-res screen 

Clear lo-res screen (top 40 Sines) 

Send a BELL character to current output device 

Clear text window from present cursor position to lower right 

of screen 

Clear entire screen and move the cursor to upper lefthand corner 

Move cursor down one line (no.change horizontally) 

Clear. text to end of line: ,-• .; ... ' .... . 



COMMAND(S) 

E,0 
E,0 
E,0 
E,0 
E,0 
E,0 
E,0 



E.O 
E 



E 
E 
O 

6 
o 
o 
o 
o 



o 
o 
o 
o 
o 



o 
o 
o 

E 
E 
E 
E 
E 
E 
E 
E 
C 
C 

c 
c 

c 
c 
c 



VALUES 

0-39 

1-40 

0-24 

0-24 

0-39 

0-23 
255 = normal 
127 = flashing 
63 = inverse 
= inactive 
> 127 = active 



■$4C f .$LO, $HI 
Negative ASCI! 



0-255 
0-255 
0-255 
0-255 
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ICRO 



fill: 



6809E Microprocessor provides 8-bit economy with 16-bit 

capabilities, position independent code and many advanced 

features 

Commercial quality Keyboard with full UPPER/iower case 

ASCII, numeric keypad and cursor control keys 

Two double-sided double-density mini diskettes with 

640K bytes of IBM-compatible storage 

56K Bytes User RAM 

Full Video with programmable screen formats, bit mapped 

graphics, user definable character sets, reverse video and 

hardware scrolling, plus a light pen interface 

Full Communications support for RS-232 at 50 to 19.2K 

baud with programmable data formats 

Built-in I/O Drivers include 6 parallel I/O ports, 3 seriall/0 

ports, 6 timers/counters, 20 mA current loop, and a 

programmable cassette interface 



THIS IS 

FOCUS 






Choice of two 'Universal' 6809 Disk Operating Systems 
supported by many companies: FLEX™ or OS-9™ 

Extended Floating Point Disk BASIC 

Interpreted and Compiled 
Text Editor and Macro Assembler 
Full feature FiexiMon debugging monitor 
Built-in Word Processor 



FOCUS ... on its 

Vf ISLITY 




IEEE-488 Bus Controller option for instrumentation 

Supports multiple 8" diskette drives 

PASCAL, FORTH and other high level programming 

languages are available 

Complete Application Packages are available from many 

software sources 

Add-on Hardware includes: Date/Time, Opto-lsolators, 

Stepper-Motor Controller, A/D and D/A, RAM and EPROM 

Memory, and others from several manufacturers 







FOCUS provides a completely integrated system of 
hardware and software, so that you can concentrate on 
your application requirements 



* Licensing - "ii for '''.'-,: ' . . 

Please contact The COMPUTERIST, Inc. for further details. 



Very CompIete 






(s^p^aati^f 

34 Chelmsford Street 
Chelmsford, MA 01824 

Phone: 617/256-3649 
Telex: 955318 INTL DIV 



GET FREE SOFTWARE FOR YOUR COMPUTER! 

HOW? JUST ORDER ANY OF THE ITEMS BELOW, AND SELECT YOUR FREE SOFTWARE FROM THE BONUS 
SOFTWARE SECTION, USING THE FOLLOWING RULE: FOR THE FIRST $100.00 WORTH OF MERCHANDISE 
ORDERED TAKE 1 ITEM; FOR THE NEXT $200.00 WORTH OF MERCHANDISE ORDERED TAKE ANOTHER ITEM; 
FOR THE NEXT $300.00 TAKE A THIRD ITEM, ETC. ALL AT NO COST. 






HARDWARE by APPLE COMPUTER 

APPLEII + .4BK 1199 PASCAL 150 

FLOPPY DR. + CNTRLR 545 FLOPPY DRIVE 465 

APPLEIII. 128K 2999 PILOT 125 

We carry the rest of the APPLE line at low. low prices! CALL! 



OTHER HARDWARE for APPLE 

D.C.HAYES: 

Micromodemll 
MICROSOFT: 
ZSOSoftcard 
MOUNTAIN COMPUTER: 

Expansion Chassis 
A/D + D/ACard 
X/ 10 Control Card 



285 Smartmodem 



559 
299 
169 



Music System 
CPS Multi-function 
SuperTalker 



CALL FOR MORE PRICES! WE CARRY FULL LINE 1 
CALIFORNIA COMPUTER SYSTEMS: 
Centronics Par. Int. 115 A/DConverler 

Async. Serial Int. 135 Calendar/Clock 

CALL FOR MORE PRICES' WE CARRY FULL LINE* 
VIDEX: 

80 Col . Bd . & Softswitch 235 Enhancerl 
Enhancer I 105 Softswitch 

MORE OTHER HARDWARE FOR APPLE: 



SSMAIO-II 
SSMSeriatASlO 
SSMPar.APIO 
Novation Apple Cat 
Versawriter Tablet 
Prac. Periph. Microbuff. 
(32K) 



195 

115 
99 
319 
249 



Keybd. Co. Mum 
SurtshineJoystick 
Game Paddles 
Shadow /Vet 
SUP'R'MOD 
Prac. Periph Microti; 
(16K) 



225 

139 

339 
169 
169 



105 
101 



125 
29 

129 
39 
29 

885 
29 

' 210 



OTHER SOFTWARE for APPLE: 

PERSONAL SOFTWARE/VISICORP: 

Visicalc3.3 195 Visifiles 

CALL FOR MORE PRICES' WE CARRY FULL LINE 1 

MICROSOFT: 



129 

139 
125 
99 



APPLE Fortran (Z80) 

TASC Basic Compiler 

TIMEManager 

ALDS 

MICRO-PRO: 

Wordstar 

Spellstar 

Super-Sort 

PEACHTREE: BIZPackages. all 

CPA BIZ Packages, ail 



APPLECobol(Z80'l 499 

MBASICCompiler(Z80) 299 

MuMath 199 

M/SORT 149 



225 

149 
149 



Mail-Merge 

Oala-Star 

Calc-Star 



99 

199 
149 
.199 
.195 



MORE OTHER SOFTWARE for APPLE: 



DB Master 179 

Data Factory 5,0 239 

ASCII Express 55 

SorcimSuperCalc 189 

Howard Tax Prep. 115 

Howard Real Estate Anal 129 



DBMasterforCORVUS 399 

PFS 85 

Dakin 5 Deprec. Planner 299 

Dakin 5 BIZ Bookkeeper 299 

Broderbund Payroll 325 

BPI Accounting Pkgs/ea 325 



Synergistic ' ' Data Reporter" Manages . Plots & Edits Data 1 1 8 



WORD-PROCESSORS & SPELLERS for APPLE: 



Wordstar CP/M 
MagicWandCP/M 
Executive Secretary 
Letter Perfect 
Magic Window 
Spellguard 



225 

>9 
199 

125 
85 
219 



EZWriterProl.Sys 


215 


MUSESuperText80 


15U 


Word power 


50 


Hebrew II 


55 


Screenwriter II 


110 


SpellstarCP/M 


149 



WordHandler(Gives80-Col.&Lower-Casewithnoboard!) 199 



PRINTERS 



EPSON: 

MX80 

MXIOOw/Graflrax 

APPLE Intfce/Cbl 

GRAPPLERInttc 

MX80 Ribbon 

C.1T0H: 

F- 10 Daisy Wheel (Par) 

Pro-Writer(Par/Ser) 

F-10TractorOption 

NEC: 

PC-8023A 

QUME: 

SPRINT9/45 

OKIDATA: 

Mtcroline82A 

MicrolineTractor 

Microline83A 

IDS: 

560with graphics 

Prism80(Basic) 

Auto Sheet Feed 

Sprint Mode(200cps) 



449 
729 
85 
149 

15 



MX80F/T 

MX70w/Graftrax 

GRAFTRAX 

2K Buffer Serial Card 

MX100 Ribbon 



549 
285 

60 
135 

24 



1495 F-IODaisyWheel(Ser) 1495 
599 Pro-Writer(Par) 499 

225 Printer Interfaces CALL 



495 NEC 7710 Daisy 
DIABLO: 

1995 630 R/0 

495 Microline80 
59 Okigraphl 
799 Microline84(Par) 



2345 
2099 

375 

79 
1099 



1095 Prism-Print Software 49 

899 Prism 132 (Basic) 1050 

125 Prism Color 325 

125 Dot Plot Graphics 85 



ADD-ON MEMORY CARDS & DISK DRIVES 
FOR APPLE 
MEMORY: 

Microsoft 16KRamcard 139 Saturn 32K Card 
Legend 128KRamcard 649 Saturn 64K Card 
Legend 64KRamcard 299 Saturn 128KCard 
SVA256KAPL-Cache 1045 Prometheus 128K 
AXLON320KRamDisk 1149 



199 
369 
525 
439 
16Ko14116.200NSMem.25 



APPLE-COMPATIBLE FLOPPIES by MICRO-SCI: 



With Controller: 
A35 Exact Replacement 460 
A4040-Track 489 

A7070-Track 599 

8 "FLOPPY DISK SYSTEMS: 



No Controller: 

A35 Exact Replacement 415 



Vista Dual SSDD 
SVAAMS8000Dual 

SSDD 
SVAZVX40uadCntrllr. 
CORVUS HARD DISKS: 
6MB Hard Disk 
11MBHardDisk 
20 MB Hard Disk 



1299 

1945 

495 

2249 
3945 

4769 



A40 40-Track 
A7070-Track 

VistaDualDSDD 
SVAAMS8000Dual 

DSDD 
SVADisk2 + 2Cntrllr. 

Apple Interface 

OtherComputerlntfce 

MirrorBack-Up 



399 
499 



2595 
359 

175 

CALL 
675 



MONITORS, PLOTTERS & PERIPHERALS 



MONITORS: 

Zenith 12 "Green 
Amdek 12 "Green 
BMC 12 "Green 
Etectrohome RGB Intfce 
PLOTTERS: 
Watanabe1-Pen 
Slrobe Plotter 1 -Pen 
Houston Inst. DMP-3 
OTHER PERIPHERALS: 
ScottShadow/VET 
VotraxType-N -Talk 
ALF9-VoiceMusicBd. 
ALF3-VoiceMusicBd. 



125 
135 
119 

275 

1150 
699 
929 

885 
325 
155 
199 



Zenith 13 "Color 359 

Amdek 13 "Color 359 

BMC 12 "Color 349 

ElectrohomeRGB13"Clr 725 

WatanabeB-Pen 1400 

Strobel Apple Intfce 99 

Houston Inst. DMP-4 1185 

Street Echo II Synth. 189 
ComputerSIa, Dithertizer269 
Comp. Sta. Video Camera375 
Comp. Stat. Both above 599 



COMPUTER SYSTEMS 

ATARI 

ATARI 800 (16K) 629 ATARI 400 (16K) 

810DiskDrive 449 825Printer 

16K Ram Memory 89 850 Interlace 

Microsoft Basic 69 830 Modem 

I NTEC32K Ram Memory 129 Telelink Cartridge 

ATARI 800 (48K) 739 AXLON 128K Ram Disk 

ATARI 400 (48K) 
OSBORNE 

Osborne 1 1695 Printer Cable 

XEROX 

820-1 System w/5" Dr. 2450 
CP/MOp.Sys. 159 Wordstar 

Super Calc 199 DIABLO 630 Printer 

Systems-Plus BIZ. SOFTWARE. PER MODULE 
NEC 

Full Line at Low, Low Prices! CALL' 
COMMODORE VIC 

VIC20Computer 259 VIC1515Printer 

VIC 1540Disk Drive 499 VIC1211ASupr-Expndr 
VIC1530Datasette 69 VIC 101 1ARS-232Port 



335 

599 
159 
149 
25 
550 
435 



820-2 System w/8" Dr. 2950 

419 

2099 

CALL! 



GENERAL CP/M SOFTWARE 



MICROSOFT: 

Basic 80 

BasicCompiler 

Fortran 80 

Cobol80 

Macro 80 

MICROPRO: 

Wordstar 

Mailmerge 

Spellstar 

Datastar 

ASHTON-TATE: 

dBASEll 

SORCIM: 

Super Caic 189 

FOX-GELLER: 

Quickscreen 129 dUTIL 

QuickcodefWritesprogramsfordBASEII) 

ISA: 



275 

299 
339 
499 
139 



165 
239 



Edit 80 

MuMath/MuSimp 
MuLisp/MuStar 
M-Sort 
Z-80Softcard/ Apple 

Calcstar 
Supersort 

Custom. Notes 



475 dBASE II Guide 



Spellguard 
PEACHTREE: 
Gen. Ledger 
Acct.Rec. 
Acct.Pay. 
. Payroll 
SYSTEMS PLUS 
All Modules 



219 

399/40 
399/40 
399/40 
399/40 

415/EA 



Inventory 
Magicalc 
Sales Invoicing 



139 
199 
159 
128 



199 
165 
275 



69 
199 



399/40 
269/25 
399/40 



S-100 BOARDS 

HAYES S- 100 MODEM 325 HAYES SMARTMODEM 219 
HAYES CHRONOGRAPH 189 CCS64KRAM BOARD 525 



Elephant 5.25" 
SottSSSD/bx 
3M5"SoftSSSD/bx 
Maxell 5" Soft SSSD/bx 
DYSAN5"SoftSSSD/bx 



FLOPPY DISKS 

Elephant 8" 



SoftSSSD/6x 
3M8"SoftSSSD/bx 
Maxell 8 "Soft SSSD/bx 
DYSAN 8 "Sof SSSD/bx 



BONUS SOFTWARE SECTION ! 



Let us acquaint you with MESSAGE-MAKING SOFTWARE. Just place the disk in the 
APPLE, enter the text, and colorful, dynamic messages appear on the screens of TV sets 
connected to the computer. Use the software to broadcast messages on TV screens in 
schools, hospitals, factories, store window, exhibit booths, etc The following program is 
our latest release: 

SUPER MESSAGE: Creates messages in full-page "chunks". Each message allows 
statements of mixed typestyles, typesizes and colors, in mixed upper and lower case 
Styles range from regular APPLE characters, up to double-size, double-width characters 
with a heavy, bold font. Six colors may be used for each different typestyle. tertical and 
horizontal centering are available, and word-wrap is automatic Users can chain pages 
together to make mu Hi -page messages. Pages can be advanced manually or automatical- 
ly. Muiti-page messages can be stored to disc or recalled instantly. 

REQUIRES 48K & ROM APPLESOFT $50. 

APPLE PLOTS YOUR DATA & KEEPS YOUR RECORDS TOO! APPLE DATA GRAPH 2.1: 
Plots up to 3 superimposed curves on the Hi-res Screen both X & Y axes dimensioned. 
Each curve consists of up to 120 piecesof data Graphs can be stored to disc and recalled 
immediately for updating. Up to 100 graphs can be stored on the same disc. Great for 
Stock-market Charting, Business Management, and Classroom instruction! 

REQUIRES 48K & ROM APPLESOFT $35. 

APPLE RECORD MANAGER: Allows complex files to be brought into memory so that 
record searches and manipulations are instantaneous. Records within any file can con- 
tain up to 20 fields, with user-defined headings. Information can be string or numeric. 
Users can browse thru files using page-forward, page-backward or random-search com- 
mands. Records can easily be searched, altered or sorted at will Files can be stored on 
the same drive as the master program, or on another, if a second drive is available. 



Records of files can be printed, if desired. Additional modules coming are a STATISTICS 
INTERFACE, CHECKBOOK, MAILING LIST & DATA-ENTRY 

REQUIRES 48K & ROM APPLESOFT $40. 

APPLE LITERATURE DATABASE: Allows rapid retrieval (via keywords) of references from 
total APPLE literature thru 1980, on 5.25 "disk. EacheMry in the data base consists of the 
article, author-name, periodical-name, date of issue, & page nos. The database is 
intended lo support large magazine files which would require lengthy manual searching 
to recover information. Annual updates will be available 

REQUIRES 48K & ROM APPLESOFT $60. 

WORDPOWER: Is a simple, powerful, low cost, line-oriented word-processor program. It 
offers a fast machine language FIND & REPLACE. Text can be listed to screen or printer, 
with or without line-numbers. Lower-case adaptors are supported. You can merge files, 
move groups of lines, and easily add, change, or delete lines. WORDPOWER can be used 
to create and maintain EXEC files. It can also be used as a rapid, unstructured, informa- 
tion-storage and retrieval system via its rapid search capabilities. 

REQUIRES 48K & ROM APPLESOFT $50. 

LABELMAKER: Allows users to quickly create address labels. A given label may be gen- 
erated in any quantity from 1 to 32767. Space is allowed on labels for a personal and 
company name, but the space is automatically closed up if only a personal name is 
entered. Space is also allowed for foreign countries. The program can also generate 
labels for price-tags, part numbers and mail-messages such as "RUSH", "FRAGILE", etc. 
A self-incrementing feature allows theatre-tickets to be produced, with a date, and 
numbers running from aOOO to z999. An editor is provided for editing labels prior to print- 
ing. All labels may be saved to disk for instant recall. 
REQUIRES 48K & ROM APPLESOFT $35- 



Above software for APPLE DOS 3.2/3.3 only. Call for BONUSES for other systems. 

TO ORDER: Use phone or mail. We accept VISA, MASTERCARD, COD's, personal checks & 

money orders. Add 4% for credit card. Customer pays handling on COD orders. Foreign 

orders must be in American Dollars & include 10% for handling. Connecticut residents add 

7.5% sales tax. Prices subject to change without notice. 

Not responsible for typographical errors. Prices subject to change without notice 



CONN. INFO. SYSTEMS CO. 
(203)579-0472 

218 Huntington Road, Bridgeport, CT 06608 
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Advertiser's Index 



AIM HIGH 

Let Unique Data Systems help you raise your sights on AIM 65 
applications with our versatile family of AIM support products. 

• Go for high quality with our ACE-100 Enclosure. It accom- 
modates the AIM 65 perfectly, without modification, and features 
easy access two board add-on space, plus a 3" x 5" x 1 7" and a 
4" x 5" x 15.5" area for power supplies and other com- 
ponents. $186.00. 

• Get high capability with Unique Data System s add-on boards^ 
The UDS-1 00 Series Memory-I/O boards add up to 1 6K bytes of 
RAM memory or up to 48K bytes ROM/PROM/EPROM to your 
Rockwell AIM 65. You also get 20 independently programmable 
parallel I/O lines with an additional user-dedicated 6522 VIA, two 
independent RS-232 channels with 16 switch-selectable baud 
rates (50 to 19.2K baud), and a large on-board prototyping area. 
Prices start at $259.00. tIru>4/lflB . 

• If you need to protect against RAM data loss, the UDS-1 00B of- 
fers an on-board battery and charger/switchover circuit. $296.00. 

• Heighten your AIM 65's communications range by adding the 
UDS-200 Modem board. It features full compatibility with Bell 
System 103 type modems and can be plugged directly into a 
home telephone jack via a permissive mode DAA. No need for a 
data jack or acoustic coupler. The UDS-200 also has software- 
selectable Autoanswer and Autodial capability with dial tone 
detector The modem interfaces via the AIM 65 expansion bus, 
with the on-board UARTand baud rate generator eliminating the 
need for an RS-232 channel. $278.00. 

-The UDS-300 Wire Wrap board accepts all .300/.600/.900 IC 
sockets from 8 to 64 pins. Its features include an intermeshed 
power distribution system and dual 44-pin card edge connectors 
for bus and I/O signal connections. $45.00. 

• Get high performance with the ACE-1 00-07 compact 4" x 5" x 
1 7" switching power supply delivering + 5V @ 6A, + 1 2V @ 1 A, 
and + 24V for the AIM printer. $1 1 8.00. 

Installation kits and other related accessories are also avail- 
able to implement your AIM expansion plans. Custom hard- 
ware design, programming, and assembled systems are also 
available. High quality, high capability high performance, with 
high reliability ... all from Unique Data Systems. Call or write 
for additional information. 

Unique Data Systems Inc. 
1600 Miraloma Avenue, Placentia, CA 92670 

(714)630-1430 
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August: Programming Techniques 

• Structured Programming in 6502 

Assembly Language — This discussion of 
structured programming demonstrates how 
you can use it to improve and simplify your 
programming methods. 

• Pattern Matching with the 6502 — Pattern 
matching algorithms attempt to find one or 
more occurrences of a given character 
string in a specified range of memory. Text 
editing is a common application. This article 
presents elementary and advanced 
algorithms. 

• Random Number Generator in Machine 
Language — This simple routine can be 
easily implemented in a machine-language 
program whenever random numbers are 
needed. 



• New Character Set for VIC-20 — This 
technique involves altering the character 
ROM pointer to point to RAM, copying 
characters from ROM, and defining your 
own characters, pixel-by-pixel! 

Plus... 

PET/AIM Connection 
PET to AIM Download 
VIC Duty Cycle Monitor 
On Error GOTO (OSI) 
Straightforward Garbage Collection 
for the Apple 

And Our Regular Columns 
and Departments... 



Apple Slices 
PET Vet 
Reviews in Brief 



Short Subjects 
Tech Data Sheet 
And more! 






20% OFF 

Your money goes farther when you sub- 
scribe. During the course of a year, when you 
subscribe, you save 20% (in the U.S.). 

Pay only $24.00 ($2.00 a copy) for 12 monthly 
issues of MICRO sent directly to your home or 
office in the U.S. 



More MICRO for Less Money 
When You Subscribe 

But on the newsstand — if you can locate the 
issue you want — you pay $30.00 a year ($2.50 
a copy). 

Special Offer — Subscribe for 2 years ($42.00) 
and get 30% off the single issue price. 

Subscribe to MICRO today. 



MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Please send me MICRO for _ 1 year _ 2 years 
NOTE: Airmail subscriptions accepted for 1 year only. 



Check enclosed $_ 
Charge my 

No. „_^_^_„ 



. VISA account 

. Mastercard account 



Expiration date . 

Name 

Address 



City/State . 



-Zip 



Subscription Rates Effective January 1, 1982 
Country Rate 



United States 

Foreign surface mail 

Europe (air) 

Mexico, Central America, Mid East, 

N. & C.Africa 
South Am., S. Afr„ Far East, 

Australasia, New Zealand 



$24.00 1 yr. 
42.00 2 yr. 
27.00 
42.00 

48.00 

72.00 



* Airmail subscriptions accepted for only 1. year. 
For U.S. and Canadian 2-year rates, multiply by 2. 



JobTitie: 



Type of Business/industry: . 
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On the new, slicked-up, 
trimmed-down Starwriter F-10. 

It's C. Itoh's latest genera- 
tion of letter- quality printers. 

It cranks out flawless copy 
at 40 cps; and its full 15" 
carriage lets it double in brass 
for both letter processing and 
business applications. You 
can plug it into almost any 
micro on the market (serial or 
parallel) simply by plugging it 
in. And then make it keep on 
trucking with inexpensive, 
easily available Diablo com- 



patible daisy wheels and 
ribbons. 

In its serial mode, it can 
print just about anything 
(including boldface, under- 
lines, subscripts and super- 
scripts), and snap the carriage 
back to start the next line 
in less than a second. In its 
line mode, it prints in both 
directions, for even faster 
throughput. 

(While making about as 
much noise as a cat walking 
on Kleenex) 

It's a nice, portable 30 
pounds- about 10 pounds 



lighter than the Starwriters 
before it. And it stands 
exactly as tall (or precisely as 
small) as a dollar bill. 

Speaking of which: 

Incredibly, the Starwriter F-10 
sells for about the same 
preposterously low price as 
its predecessors. Which is to 
say, about $800 less than a lot 
of other printers that don't 
even come close to measur- 
ing up. Or even better. . . 

Measuring down. 



Distributed Exclu- 
sively by Leading 
Edge Products, Inc., 
225 Turnpike Street, 
Canton, Massachu- 
setts 02021. Call: toll- 
free 1-800-343-6833; 
or in Massachusetts 
call collect (617} 
828-8150. Telex 
951-624. 

LEADING 



' 



. 






I HUNTINGTON COMPUTING I 

Ti IS 




Ti 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
IS 
Ti 
IS 
IS 
IS 
IS 

IS 
IS 
IS 
IS 
IS 
IS 
IS 

IS 
IS 
Ti 
IS 
IS 
IS 



Apple 



#9483 

#9482 
#9481 
#9480 

#6061 
#6060 
#6062 

#4801 
#4803 
#4804 
#4811 
#4805 

#2058 
#2052 
#2060 
#2059 

#2061 

#3257 
#3250 
#3255 
#3251 
#3252 
#3253 
#3254 
#3258 
#3256 

#9160 

#9162 
#9163 
#9164 
#9165 



#1960 
#1967 
#1966 
#1952 
#1951 
#2000 
#1957 
#1961 
#1949 
#1965 
#1964 
#1956 
#1955 
#1959 



#8206 

#747 

#2107 

#8205 

#8039 

#8025 

#86 

#24 

#6534 

#9043 

#217 

#2362 



ADVANCED OPERATING SYSTEMS 

Apple-Aids $44.89 

Mostly Basic/Household $26-89 

Mostly Basic/Interface-Scientific $26.89 

Voyage of the Valkyrie — $35.89 

ARTSCI 

Basic Mailer $59.49 

Magic Window $84.99 

Magic Words $62.89 

AURORA 
Executive Secretary $212.49 



Gradebook . 

Hebrew II 

Hebrew II • - 

Quicktrace . . 

AVALONHILL 

Major League Baseball 

North Atlantic Convoy (Cassette) .. 
Empire of the Overmind (Cassette) 

Empire of the Overmind 

Tanktics 

BEAGLE BROS. 

Alpha Plot .... 

Dos Boss 3.3 

Dos Boss 3.2 

Game Pack #1 



$51.00 
$50.99 
$T9.I9 
$43.99 

$25.49 
$12.69 
$25.49 
$29.69 
$24.59 

$34.69 
$20.39 
$20.39 
$20.39 
«f?S.39 
$20.39 
$20.39 
$17.99 
$25.89 



#"49 

#6240 

#39 

#8020 

#725 

#35 

#16 

#325 

#36 

#860 

#31 

#59 

#2253 
#2250 
#2254 
#2259 
#2263 



Game Pack #2 

Game Pack #3 

Game Pack #4 . . 

Tip Disk ... 

Utility City ...:. 

BLACKBURG 

Active Filter Design . $35.89 

Electronics I $35.89 

Electronics II , . . $35.89 

Electronics III $35.89 

Video Display Graphics ... $35.89 

BRODERBUND 

Alien Rain $21. 19 

Alien Typhoon $21.19 

Arcade Machine $39.49 

David s Midnight Magic $30.69 

Galactic Empire $22.99 

Galaxy Wars $22.99 

Genetic Drift $25.39 

Golden Mountain $16.89 

Payroll ...... $335.69 

Red Alert $22.99 

Space Quarks $25.39 

Space Warrior $21.19 

Tank Command $12.99 

Tawala s Last Redoubt $25.39 

Track Attack ... $26.89 

HARDWARE 

Apple Clock (Mountain) $246.39 

Applesoft Renumber-and Merge in ROM 

(Soft Control) $33.89 

Applesoft Utility ROM (Soft Control) $33.89 

B S R Control (Novation) $16.69 

Basic Compiler (Microsoft) $335.69 

Basic in ROM iSoft Control) ... $33.89 

Blitz Bug (Omni) $21.89 

C PSPascaU Mountain] . $16.99 

Cable Adaptor (Centronics) $35.19 

Character Set Plus (Lazer) $22.39 

Cassette Control Device (Hartley) $67.95 

Data Link (Link) $87.99 

DISASM/65 (Lazer) . $26.29 

Dithertizer II with Camera (Computer 

Station) $639.99 

Dual DOS ROMS (Soft Control) $46.69 

E Z Port (Versa) $21.19 

Expansion Mod (Novation) $33.15 

Game Paddles (TG) $33.89 

Joyport (Sinus) $67.39 

Joystick (Mimco) $59.95 

Large Character Eprom (Videx) $34.29 

Lower Case Adaptor Rev. 7 (Paymar) . .. $29.99 
Memory Expansion Module (Prometheus) . $148.69 

Micro-Verier (ATV) $31.49 

Modem Handsel (Novation) $24.65 

Paddle-Adapple (Southern California) $26.89 

560G Paper Tiger (IDS) $1,225.00 

MX100 Ft. Printer (Epson) $749.00 

Pro Paddle (Rainbow) $44.89 

Ram Card (Microsoft) $169.00 

16K Ram Expansion Board (Andromeda) $169.00 

Sofl Switch (Videx) $25.49 

Z-80 Softcard (Microsoft) $299.00 

Super Fan II (R. H. Electronics) $64.99 

Switchplate (Videx) $17.99 

Vision 80 Card (Vista) $297.49 

MICRO LAB 

Crown of Arthain $29.69 

Dogfight $25.99 

Mad Venture $21.19 

Palace in Thunderland $21.19 

Roach Hotel $30.69 



Atari 



#239 
#235 
#234 
#233 



ADVENTURE INTERNATIONAL 

Angle Worms $12.64 

Galactic Empire $16.74 

Lunar Lander $12.64 

Sunday Golf $12.64 



ARTSCI 

#204 Cypher Bowl $43.94 

#203 Gomoku (Cassette) $16.94 

#201 Poker Solitaire $12.74 

#202 Reversi $16.94 



ARTWORX 

#834 Giant Slalom 

#823 Intruder Alert (Cassette) 

#822 Intruder Alert 

#825 Rings of the Empire (Cassette) . 

#824 Rings of the Empire 

#832 Stud Poker 



ATARI 

#285 Blackjack 

#276 Mailing List . 

#280 Missile Command 

#273 Space Invaders 

#277 Star Raiders 

AVALON HILL 

#302 Empire of the Overmind (Cassette) 

#301 Empire of the Overmind 

#308 North Atlantic Convoy (Cassette) 

#307 Nuke War (Cassette) 

#306 Planet Miners (Cassette) . 

#304 Tanktics (Cassette) ... 

#31 1 Tanktics 

EDU-WARE 

#385 Compu Math/ Decimals [Cassette) 

#384 Compu Math/ Decimals . 

#383 Compu Math, Fractions (Cassette) 

#382 Compu Math- Fractions 

*381 Compu-Read 

EPYX 

#409 Crush. Crumble & Chomp (Cassettei 

#408 Crush. Crumbles Chomp 

#407 Oatestonesof the Ryn 

#403 Invasion Orion (Cassette! 

#406 Invasion Orion 

#401 Rescue at Rigei (Cassettei 

#404 Star Warrior (Cassettei 

#405 Star Warrior 

#412 Temple of Apshai (Cassette) 

#400 Temple of Apshai 

MISCELLANEOUS 

#560 Ah Baba & the 40 Thieves (Quality) 

#861 Andromeda (Gebelh) 

#761 Casino Blackjack (Manhattan) 

#763 Concentration (Manhattan) 

#466 Crossfire (On-Lme) 

#746 Dominoes (Cassette) [Creative Computing) . 

#721 Galactic Chase (Cassette) (Spectrum) . . . 

#720 Galactic Chase (Spectrum) 

#760 Gin Rummy 3 (Manhattan) 

#740 Hail to the Chief (Creative Computing) . 

#921 Kayos (Cassette) (Computer Magic) . 

#920 Kayos (Computer Magic) 

#762 Labyrinth Run (Manhattan) 

#860 Match Racers (Gebelli) 

#662 Pathfinder (Gebelli) 

#748 Pool (Cassette) (Creative Computing) 

#322 Safari (Cassette) (CDS) 

#321 Safari (CDS) 

# 1 000 Shadow Hawk One (Horizon) 

#900 Shattered Alliance (Strategic Simulations) .. 

#567 Tank Trap (Cassette) (Quality) 

#568 Tank Trap (Quality) 

#561 Tari Trek (Cassette) (Quality) 

#562 Tari Trek (Quality) 

#461 The Wizard & The Princess (On-Lme) ... 

#800 Yahtman (Compu-Core) 



$17.54 

$14.84 

$ 18.3a 

$14.84 
$18.34 
$16.64 



$12.64 
$16.94 
$35.14 
$16.94 
$33.94 



$25.44 
$29.64 
$12.74 
$12.74 
$12.74 
$20.34 
$24.64 



$26.34 
$35.14 
$26.34 
$33.94 
$25.44 



$26.34 
$26.34 
$17.54 
$21.14 
$21.94 
$25.44 
$33.94 
$33.94 
$35.14 
$35.14 



$28.94 
$35.94 
$21.94 
$13.14 
$26.94 
$10.44 
$21.94 
$26.34 
$21.94 
$21.94 
$30.74 
$30.74 
$13.14 
$26.34 
$30.74 
$10.44 
$25.44 
$33.94 
$44.94 
$35.14 
$10.14 
$12.64 
$10.14 
$12.64 
$27.94 
$17.54 



COMING SOON! 

Hodge Podge 
for the Atari® 



Apple ' 





MISCELLANEOUS 




#2182 


Adventure in Time (Phoenix) . 


$25.39 


#2301 


Apple World (USA) 


$52.99 


#7890 


Applecillm (XPS) 


$33.89 


#3/00 


Asteroid Field (Cavalier) 


$22.49 


#2700 


Astroscope (AGS) 


$26.49 


#2180 


Birth of the Phoenix (Phoenix) 


$35.89 


#2407 


Bishop s Square (Datasoft) . 


$25.39 


#1601 


Bloody Murder (Stoneware) 


$17.99 


#3000 


Bookkeeper (Delta) . . . 


$76.39 


#3702 


Bug Attack (Cavalier) 


$26.29 


#9700 


Castles of Darkness (Logical) . . 


$30.69 


#3001 






#9860 


Chinese Lessons (CTI) 


$26.09 


#7851 


Cosmo-Mission (Cosmos) 


$21.19 


#9241 


The Count (Pear) ... 


$22.39 


#2752 


Creative Financing (Howardsoft) 


$127.49 


#2205 


Creature Venture (Highland) ... 


$21.19 


#4401 


Cyborg (Sentient) 


$28.99 


#1607 


D B Master Version 3 (Stoneware) . . 


$194.59 


#4250 


Falcons (Piccadilly) . 


$25.39 


#7878 


Financial Partner (Denver) 


$220.49 


#6080 


Firebird (Gebelli) 


$25.39 


#3954 


Form Letter (S. Sorcery) 


$26.99 


#7852 


Hungry Boy (Cosmos) ... 


$21.19 


#3451 


Interlude (Syntonic) 


$16.99 


#9840 


Jabbertalky [Mind Toys) 


$26.29 


*3150 


The Landlord (Mm Microj . 


$649.99 


#9242 


The Liberator (Pear) 


$26.89 


"2406 


Lisp Interpreter iDatasoft) 


$106.19 


#3953 


Mailing List (S Sorcery) 


$44.89 


#9240 


The Manipulator iPear) 


$31.39 


#4552 


Market Analyzer (RTR Software) 


$224.99 


#4550 


Market Charter [RTR Software) 


$110.39 


#9100 


Memory Page Editor (Compu-tronj 
The Menu iC & H Video) 


$44.89 


#9580 


$26.29 


#9380 


Menu Generator iCrane.i 


$35.09 


#1804 


Monty Plays Monopoly iVisicorpi 


$31.99 


#221 1 


Mummy s Curse (Highland) 


$26.39 


#2200 


Oldorf s Revenge (Highland) 


$16.89 


#4400 


OO-Topos i Sentient) 


$27.99 


#7870 


Pascal Programmer (Denven 


$105.99 


#7871 


Pascal Tutor (Denven 


$105.99 


# 7650 


Pornopoiy iCCM 


$25.39 


#3484 


Pot of Gold I (Ramrjow) 


$33.89 


~3-J85 


Pot of Gold II (Rainbow 


$33.89 


#2751 


Rcai Estate Analyzer < Howardsoft i 


$127.49 


«6600 


Rubik s Cube (Software Alternative! 


$16.89 


#6081 


Russki Duck (Gebelh) 


$31.39 


#1150 


Sargon II iHaydem 


$29.79 


#2701 


Sexoscope iAGSi 


$26.49 


#8901 


Snack Attack iDatamostj 


$25.39 


* » -, . 


Solitaire (Computek) 


$25.39 


-2302 


Space Raiders i.USAi 


$25.39 


#2306 


Star Dance (USA) 


$21.89 


#3701 


Star Thief .| Cavalier.) 


$25.39 


#7163 


Star Venture iCompu-Thmgj 


$26.89 


#9180 


Starship Commander .. Voyager j 


$35.89 


#4251 


Suicide (Piccadilly) 


$26.29 


#3955 


Text Editor |S Sorceryi 


$58.39 


#8901 


Thief (Datamosti 


$25.39 


#7853 


Thunderbirds - GX iCosmosi 


$21.19 


#7102 


Tnckshot ilDSI) 


$35.09 


#1606 


Utility Pak # 1 iStoneware) 


$21.19 


#4100 


Visicaid i Data S C i 


$29.69 


#1820 


VistCalc3 3(Visicorp] 


$199.00 


#1805 


VisiFile (Visicorp) 


$212.49 


#9740 


Vocanoes (Earthwarei 


$43.49 


#2181 


Zoom Grafix (Phoenix) 


$35.89 


#7880 


Zork I ilnfocom) 


$33.89 


#7881 


Zork ll tlhfocomi 

SIRIUS 


$33.99 


#1058 


Autobahn 


$25.39 


#1068 


Beer Run 


$19.99 


#1073 


Borg 


$26.89 


#1074 


Computer Foosball 


$25.39 


M065 


Copts & Robbers . 


$29.69 


#1051 


Cyber Strike 


$33.89 


?1067 


Dark Forest 


$19.99 


?1060 


Gamma Goblins 


$25.39 


f 1061 


Gorgon 


$33.89 


rl069 


Hadron 


$29.69 


M057 


Pulsar II 


$25.39 


"1071 


Snake Byte 


$25.39 


7 1064 


Sneakers 


$25.39 


' 1 05b 


Space Eggs 


$19.99 


if 1050 


Star Cruiser . . 


$20.99 


t 1072 


Twerps 

SYNERGISTIC 


$26.89 


1220 


Adventure lo Atlantis 


$35.99 


1216 


Data Reporter 


$186.99 


1202 


Dungeon Campaign 


$14.79 


1210 


Escape Irom Arcturus 


$25.39 


1214 


The Linguist 


$33.99 


1200 


Odyssey 


$25.39 


1207 


Program Line Editor 


$33.99 


T201 


Wilderness Campaign 


$ 1 8.49 



Call Toll-Free 800-344-5106 (outside California) 



HUNTINGTON COMPUTING 

Post Office Box 1297 
Corcoran, California 9321 2 



Foreign Orders 209-992-4481 
In California 800-692-4146 



We take MasterCard, American Express or VISA (Include card # and 
Apple* is a registered trademark oi Apple Computer, inc. expiration date). California residents add 6% tax. Include $2.00 for postage. 
Pet" is a registered trademark of Commodore. Foreign and hardware extra. Foreign (excluding Canada): remit U.S. cur- 

TRS-80- is a registered trademark of Tandy Corp. rency checks on U.S. banks, use listed charge cards, or make direct wire 

transfers through Security Pacific Bank, Corcoran, for a S6.00 charge. All 

overseas orders shipped by air. Send for free catalog. Prices subject to 

change without notice. 



Atari " is a registered trademark of Atari, Inc. 

Outside Calif. 800-344-5106 
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